MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


2 participantes

    Identificar teclas dependendo da situação

    biligo
    biligo
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 228
    Registrado : 10/04/2014

    Identificar teclas dependendo da situação Empty Identificar teclas dependendo da situação

    Mensagem  biligo 14/9/2016, 08:12

    Boas galera,

    Tenho os seguintes eventos,

    Código:
    'Ao perder o foco
    Private Sub txtQuant_LostFocus()

        DoCmd.RunCommand acCmdSaveRecord
        DoCmd.GoToRecord , , acNewRec
        Me.txtIdentCardapio.SetFocus
    'Salvar, "ir para" Novo registro e selecionar item para o foco.

    End Sub

    Código:
    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

    Select Case KeyCode

    Case vbKeyEscape
        DoCmd.RunCommand acCmdSaveRecord
        Me.btnComentar.SetFocus
    Case vbKeyDel
        Call btnExcluir_Click
    Case vbKeyInsert
        Call btnComentar_Click

    End Select

    A questão é que quando tenho o campo txtQuant.Setfocus e pressiono a tecla "Esc" me gera um erro pois é carregado primeiro o comando de ir para criar novo registro e depois
    selecionar o botão comentar que não existiria pois o registro no foi criado.
    Sei que devo usar um If mas como identifico se um campo tem o foco? pesquisei bastante mas não consegui achar um jeito.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8499
    Registrado : 05/11/2009

    Identificar teclas dependendo da situação Empty Re: Identificar teclas dependendo da situação

    Mensagem  Alexandre Neves 14/9/2016, 20:22

    Boa noite,
    Para identificar o controlo do foco, utilize ActiveControl
    if activecontrol="NomeDoControlo" then ...


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

      Data/hora atual: 25/11/2024, 01:19