Seiken
08 de Julio del 2003

Hola queria hacer un programilla que metiera las teclas pulsadas en el teclado(sin tener que introducir texto en un textbox)en un fichero.
Me han dicho que con getasynckeystate puedo coger la tecla pulsada, pero como meto la tecla en una variable para guardarla en el fichero?

Lycos
08 de Julio del 2003

Tienes que buscar las constantes que definen a cada tecla... un ejemplo de MSDN te puede ayudar...





Declare Function GetAsyncKeyState Lib "User" (ByVal Key As Integer) As Integer
Const KEY_ESCAPE = &H1B

Sub Command1_Click()
Text1.Text = "Press ESCAPE to quit"
Do While DoEvents()
If GetAsyncKeyState(KEY_ESCAPE) Then
Text1.Text = "ESCAPE pressed"
Exit Sub
End If
Loop
End Sub


Un saludo