MaximoAccess

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

Obrigado

Administração do MaximoAccess

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


    [Resolvido]Bloquear teclas F5 e Esc em tempo de execução

    avatar
    MMS
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 103
    Registrado : 12/04/2011

    [Resolvido]Bloquear teclas F5 e Esc em tempo de execução Empty [Resolvido]Bloquear teclas F5 e Esc em tempo de execução

    Mensagem  MMS em 24/3/2020, 00:10

    Boa noite, preciso bloquear as teclas f5 e Esc ao abrir um formulário e somente para o formulário em execução e não para todo o BD. Sei que com macro AutoExec é possível , porém bloqueia todo o banco e essas funções são úteis em outras partes do sistema, portanto preciso bloquea-las apenas para um Form específico em tempo de execução.. É possível ?

    Grato,

    Marcelo
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1587
    Registrado : 22/11/2016

    [Resolvido]Bloquear teclas F5 e Esc em tempo de execução Empty Re: [Resolvido]Bloquear teclas F5 e Esc em tempo de execução

    Mensagem  DamascenoJr. em 24/3/2020, 02:15

    Nas propriedades do formulário habilite a visualização de teclas e no evento "ao pressionar tecla" do formulário então bote isso
    Código:
    Select Case KeyAscii: Case vbKeyEscape, vbKeyF5: KeyAscii = 0: End Select


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    MMS
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 103
    Registrado : 12/04/2011

    [Resolvido]Bloquear teclas F5 e Esc em tempo de execução Empty Bloquear teclas F5 e Esc em tempo de execução

    Mensagem  MMS em 24/3/2020, 14:34

    bom dia! Obrigado pela dica, mas infelizmente não funcionou. Ambas teclas ainda continuam ativas. Colei o código no evento ao pressionar tecla e ativei a vizualização de teclas, mas não funcionou. Alguma dica?
    cleverson_manaus
    cleverson_manaus
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 989
    Registrado : 23/09/2011

    [Resolvido]Bloquear teclas F5 e Esc em tempo de execução Empty Re: [Resolvido]Bloquear teclas F5 e Esc em tempo de execução

    Mensagem  cleverson_manaus em 24/3/2020, 15:52


    Bom dia,


    utilizo essa rotina no evento ao apertar tecla do formulário praticamente para qualquer tecla:


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

    On Error GoTo TrataErros

    Select Case KeyCode
                     
       
        Case vbKeyF5
           
                KeyCode = 0 
     
        Case vbKeyEscape
           
                KeyCode = 0

        Case Else
       
       
    End Select

    Saida:

    Exit Sub

    TrataErros:

        MsgBox " " & Err.Description & ".", vbExclamation, "Erro Sistema!"
        Exit Sub

    Resume Saida


    End Sub



    .................................................................................
    afro

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Marcar o tópico como resolvido!!!
    avatar
    MMS
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 103
    Registrado : 12/04/2011

    [Resolvido]Bloquear teclas F5 e Esc em tempo de execução Empty Bloquear teclas F5 e Esc em tempo de execução

    Mensagem  MMS em 24/3/2020, 17:49

    Perfeito! Funcionou, obrigado. Meio parecido com a dica do Damasceno, mas dessa forma no evento ao apertar funcionou. Obrigado a todos.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1587
    Registrado : 22/11/2016

    [Resolvido]Bloquear teclas F5 e Esc em tempo de execução Empty Re: [Resolvido]Bloquear teclas F5 e Esc em tempo de execução

    Mensagem  DamascenoJr. em 24/3/2020, 22:36

    lol!


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    Conteúdo patrocinado

    [Resolvido]Bloquear teclas F5 e Esc em tempo de execução Empty Re: [Resolvido]Bloquear teclas F5 e Esc em tempo de execução

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 2/4/2020, 05:11