Cómo utilizar el Asistente para pulsaciones de teclas para hacer que su teclado simule un mouse
Rara vez veo temas tan interesantes en Zhihu. El siguiente es mi código:
¿Declare?Function?GetAsyncKeyState?Lib?"user32"? ¿"GetAsyncKeyState"?(ByVal?vKey?As?Long)?As?Integer
nowleft?=?0
Mientras?1
If?GetAsyncKeyState( 88)?0?and?nowleft=0?Then?
LeftDown?
nowleft=1
ElseIf?GetAsyncKeyState(88)?>= 0?and?nowleft=1?then
LeftUp?1
nowleft=0
¿Fin?Si
Retraso?50
Wend
Wind
Utilice la API proporcionada por Windows: GetAsyncKeyState para detectar el estado de la clave X.
Este código cumple muy bien con tus requisitos. ¡Espero que te sea útil! ^o^