[Resolvido]Teclado Combinação

Boa noite queria fazer uma combinação para um comando      Control + A

tentei:

If KeyCode = vbKeyControl + A


KeyCode = 0
end if


If KeyCode = vbKeyControl and  vbKeyA

KeyCode = 0
end if

Não deu Certo

Evento "ao apertar tecla"

Código:

If Shift * 100 & KeyCode = "20065" Then
    KeyCode = 0
End If

Bom dia
Obrigado DamascenoJr Deu Certo
acho que não e muito o intuito do forum, existe algum tópico sobre isso para dar uma estudada!

Tirei daqui
usandoaccess.com.br/dicas/como-interceptar-teclas-e-combinacoes-de-teclas.asp

Obrigado