MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Evento de controle guia

    Compartilhe

    ilvecchio
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 16/11/2012

    [Resolvido]Evento de controle guia

    Mensagem  ilvecchio em 19/3/2015, 16:52

    Buenas!

    Criei um controle guia com duas Guias. Numa delas Guia2, tenho entre outros um caixa de listagem.
    Tentei colocar alguns eventos "ao clicar" na Guia2, mas nenhum funcionou. A impressão que tive é que clicando na Guia2, o único fato é a abertura dela, embora na aba de propriedades "evento" aparecem: ao clicar, ao clicar duas vezes, ao apertar mouse, ...
    Nem mesmo uma mensagem (Msgbox "Teste") funciona.

    Então, pergunto, não é possível atrelar um evento ao clicar na guia?

    LiveBrain
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 182
    Registrado : 15/05/2011

    Re: [Resolvido]Evento de controle guia

    Mensagem  LiveBrain em 19/3/2015, 20:10

    olha só, veja se isso ajuda


    Coloque esse código no evendo Click do seu controle de Guia


    Código:
    MsgBox NomeSeuControleGuia.Value

    Esse comando retorna o número da Guia que vc clicar. Lembrando que a primeira guia é a número 0

    Incrementando um pouco mais o código, podemos retornar o Nome da guia

    Código:
    MsgBox NomeSeuControleGuia.Pages.Item(NomeSeuControleGuia.Value).Name

    Abraços


    .................................................................................
    Abraços

    Live Brain Tutoriais

    "Fraca é a pessoa que não conhece a força que possui nos amigos"

    ilvecchio
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 16/11/2012

    Re: [Resolvido]Evento de controle guia

    Mensagem  ilvecchio em 25/3/2015, 12:05

    LiveBrain.

    O que eu precisava era disparar evento ao clicar numa guia.
    Tive que criar botões para gerar os eventos necessários, pois o evento click da guia não funciona como em outros objetos.
    Mesmo assim, obrigado.

    ilvecchio
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 16/11/2012

    Re: [Resolvido]Evento de controle guia

    Mensagem  ilvecchio em 29/4/2015, 09:52

    O evento é ao alterar.

    Private Sub Guias_Change()

    Select Case Me.Guias.Value

    Case 0 ' primeira guia

    Case 1 ' segunda guia

    ...

    End select

      Data/hora atual: 3/12/2016, 14:43