relacionar commandbutton con F1

[juanpablo3]

Hola a todos,

quiero hacer un form en el que un commandbutton corresponda a la tecla F1, otro con F2,...etc.

No quiero hacer que si detecta el evento de teclado F1, se ejecute lo mismo que si pulsaras al botón en cuestión ya que si pongo

commandbutton.enabled=false

al pulsar F1 seguiría ejecutando el código.

Lo he hecho con una variable "cerrojo" y he conseguido que funcione pero ante un gran número de botones y de estados distintos de los botones (van a estar habilitándose y deshabilitándose continuamente) es muy costoso de gestionar.

¿Alguien sabe cómo se hace?

Muchas gracias por adelantado

[Nav]

Crea un textbox y en el evento keydown lo puedes usar tb en un from en el mismo evento

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
MsgBox KeyCode
End Sub


el F1 es el 112


cualkier cosa nav.msn@hotmail

[Nav]

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
' si presiona F1 en la caja de texto envia mensaje hola
if keycode = 112 then msgbox "hola"
End Sub

[cero cool]

PARA LLAMAR CUALQUIER EJECUCION DE EL BOTON TIENE QUE ESTAR HABILITADO pero puedes ocultarlo Y podrias llamarla asi

private sub form1 on click_event key_down

if keycode="{f4}" then
command1.value=1
end if

end sub