Comando Ao Apertar F1

[AlexMunhoz]

Gostaria de um ex. mostrando como executar um comando (form1.show) quando o usuáro apertar o F1.

Grato.

[mestre fyoda]

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

If KeyCode = 13 Then

Formulario.show

End Sub

e não esqueça de habilitar a keypreview do form para true .

[AlexMunhoz]

note q esse form vai funcionar enter como tab , mas ai você adapta o codigo

Private Sub Form_KeyDown(KeyCode As Integer, Shift _

      As Integer)

  If KeyCode = vbKeyReturn then

    ação do form

    KeyCode = 0

  End If

End Sub

Essa função eu já conheço eu gostaria de saber qual o valor correspondente à tecla F1.

Mas muito obrigado pela dica.

[mestre fyoda]

tenta assim

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

If KeyCode = 112 Then

Formulario.show

End Sub

se não der certo me diga q vou dar uma olhadinha .

[AlexMunhoz]

VLW IRMÃO, DEU CERTINHO

[Denis_Rave]

Podia ter usado

If KeyCode = vbKeyF1 Then

se você precisar saber sobre qualquer outra tecla procura no F2 do vb, por "KeyCodeConstants"