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)?

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^