ben ta mejorcito q el anterior codigo con el q trate de usar...
ahora toy usando haci...
Cita: Public Class Form1
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const KEYEVENTF_KEYUP = &H2
Const VK_LWIN = &H5B
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Call keybd_event(38, 0, 0, 0)
Call keybd_event(38, 0, KEYEVENTF_KEYUP, 0)
'Call keybd_event(VK_LWIN, 0, 0, 0)
'Call keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP, 0)
Timer1.Enabled = False
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Enabled = True
End Sub
End Class
eso probe en el vb2005 y me funcione bien... pero una preguntita q parte del codigo
Cita: Call keybd_event(38, 0, 0, 0)
Call keybd_event(38, 0, KEYEVENTF_KEYUP, 0)
modifico para q me apriete el "Ctrl" el 38?
Muchas gracias...
Salu2!
EDD: mmm como soy curioso movi algunas cosas y me di cuenta q
q estas constantes son las q dicen q teclas
Cita: Const KEYEVENTF_KEYUP = &H2
Const VK_LWIN = &H5B
ahora voy a tratar de buscar la traduccion de Ctrl a eso codigo