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


3 participantes

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

    avatar
    MMS
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 112
    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 Seg Mar 23, 2020 6:10 pm

    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 : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 21/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. Seg Mar 23, 2020 8:15 pm

    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 : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 112
    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 Ter Mar 24, 2020 8:34 am

    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
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1012
    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 Ter Mar 24, 2020 9:52 am


    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 : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 112
    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 Ter Mar 24, 2020 11:49 am

    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 : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 21/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. Ter Mar 24, 2020 4:36 pm

    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: Sex Abr 19, 2024 5:03 am