SEND_KEY E KEYBD_EVENT PARA SIMULAR TECLA PRES...

USUARIO.EXCLUIDOS 12/06/2005 12:56:23
#88500

eu tenho um programa na minha barra de tarefas que é acionado uqndo a tecla F4 é precionada.
Estou tentando fazer um API qaue simule o pressionamento da tecla F4 e consequentemente aciona este programa.

minha primeira tentativa foi com o seguinte código.

Private Sub Command1_Click()
SendKeys "{F4}"
End Sub

Não deu certo...

Agora tentei o seguinte código:

Private Declare Sub keybd_event Lib "user32" ( _
ByVal bVk As Byte, ByVal bScan As Byte, _
ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Sub Command1_Click()
keybd_event VK_F4, 0, 0, 0
End Sub

não deu certo tb...
alguém poderia me ajudar???
Preciso simular o precionamento da tecla F4.
(eu uso o Windows XP)
obrigado!