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]Desabilitar Control+Vírgula

    Compartilhe
    avatar
    eullerTec
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 55
    Registrado : 06/09/2016

    [Resolvido]Desabilitar Control+Vírgula

    Mensagem  eullerTec em Ter 18 Abr 2017, 23:49

    Saudações sábios Mestres!
    Estou com Bd em uso já na empresa que trabalho para marcação de consultas, deste então tá rodando até direitinho, mas mexendo em algumas funções para ajustes percebi que quando pressionamos a tecla (Ctrl+,) Control+Vírgula, ele entra em modo design no Formulário que o usuário esteja. E isso acaba ficando vulnerável para mexerem onde o usuário não deve.
    Alguém poderia me ajudar a resolver?
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9546
    Registrado : 04/11/2009

    Re: [Resolvido]Desabilitar Control+Vírgula

    Mensagem  JPaulo em Qua 19 Abr 2017, 11:32

    Olá;

    Essa é uma combinação de teclas que muita pouca gente sabe, provavelmente o user final fez sem querer e descobriu;

    Pode tratar isso assim, no formulario;

    Código:
    Private Sub Form_Load()
        Me.KeyPreview = True
    End Sub

    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
     If (Shift And acCtrlMask) > 0 And KeyCode = 188 Then
            MsgBox "Combinação de teclas bloqueadas!", vbCritical
            KeyCode = 0
        End If
    End Sub


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4394
    Registrado : 15/03/2013

    Re: [Resolvido]Desabilitar Control+Vírgula

    Mensagem  ahteixeira em Qua 19 Abr 2017, 12:00

    Olá a todos,
    JPaulo, com o MaximoAccess é sempre aprender.
    Boa técnica para colocar no formulário todo.
    cheers
    avatar
    CassioFabre
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 434
    Registrado : 18/01/2013

    Re: [Resolvido]Desabilitar Control+Vírgula

    Mensagem  CassioFabre em Qua 19 Abr 2017, 19:27

    Boa tarde,

    Além do excelente exemplo do grande JPaulo acima, deixo aqui também um modelo que coloquei no repositório que faz o bloqueio de teclas a nível de usuário. Pode ser interessante dar uma olhada também.

    [Você precisa estar registrado e conectado para ver este link.]

    Abraço.
    avatar
    eullerTec
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 55
    Registrado : 06/09/2016

    Desabilitar Control+Vírgula

    Mensagem  eullerTec em Qua 19 Abr 2017, 20:03

    Grande JPaulo, com sempre com boas respotas, muito obrigado tbm , CassioFabre, AhTeixeira também, já testei aqui numa cópia do meu Bd, realmente deu certo. Pois é teve uma user final que sem querer entrou em modo design mesmo com a tecla f12, e shift bloqueada, aí fique encucado com isso , daí saí testando eu mesmo como ela tinha conseguido , e vi que era o comando control+ vírgula. Muito obrigado a todos, esse Fórum é pra mim o melhor pra quem programa em Access e Vba, muito enriquecedor, que Deus abençoe todos por compartilhar seus conhecimentos, já vou aplicar esse bloqueio ao meu Banco aqui, protege-lo é sempre bom, mesmo que o user final não tenha intenção de avacalhar meu banco, mas possa ser que involuntariamente, sem querer acabe corrompendo o BD, isso não é bom.

    Muito obrigado mais uma vez!
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4394
    Registrado : 15/03/2013

    Re: [Resolvido]Desabilitar Control+Vírgula

    Mensagem  ahteixeira em Sex 21 Abr 2017, 12:31

    Olá a todos,
    Euller Souza, obrigado pelo retorno o fórum agradece.
    cheers

      Data/hora atual: Qui 21 Set 2017, 02:37