hola cuando hago generar exe me sale un error en este codigo...
Private Function CompKey(KCode As Long) As Boolean
Dim Result As Long
Result = GetAsyncKeyState(KCode) '<<<<<<<<<<<<<AKI sale error
If Result = -32767 Then
CompKey = True
Else
CompKey = False
End If
End Function
CREO KE EL COMANDO ES GETANSYKEYSTATE(KCODE)
PD: LAS DUDAS NO LAS POSTIES EN LAS FAQS, POSTEALAS EN ESTE SECTOR.
SALU2