¿Cómo usar VB para mover personajes en el juego, cuál es el código?
Esto se puede lograr usando claves simuladas:
Para un método simple, puedes encontrar un complemento llamado DaMo (es una clave simulada especialmente diseñada para asistentes de claves)
En VB, busque una referencia en la parte inferior del menú del proyecto, busque la ubicación de dm.dll en el navegador y seleccione Aceptar
Luego agregue el código en la sección general de VB;
Registro de función pública (Dm como objeto) como objeto
Shell "regsvr32 dm.dll /s " amp App.Path amp "\dm.dll " 'Registrar el complemento Desert; -Ingrese al sistema (App.Path es para obtener la ruta del programa VB)
retraso 500
Set Dm = CreateObject("dm.dmsoft") 'Crear complemento del desierto
Finalizar función
Luego agregue el código donde desea citar:
Dim Dm As Object 'Declarar DM como tipo de control
Llamar
Registrar dm
Las siguientes son varias interfaces de dm
dm.KeyPress 65 'Esto significa presionar la tecla A
dm .KeyDown 65' Esto significa mantener presionada la tecla A
p>dm.KeyUp 65' significa abrir la tecla A
Los siguientes son los valores correspondientes a las teclas en VB:
Puedes usar lo siguiente en cualquier parte del código. Las constantes del código del teclado VB reemplazan los valores reales:
Valores constantes del código del teclado VB
(0x es hexadecimal, otros son decimales) Descripción del teclado
vbKeyLButton 0x1 botón izquierdo del mouse
vbKeyRButton 0x2 botón derecho del mouse
vbKeyCancel 0x3 Tecla CANCELAR
vbKeyMButton 0x4 botón central del ratón
vbKeyBack 0x8 tecla de retroceso
vbKeyTab 0x9 tecla TAB
vbKeyClear 0xC tecla CLEAR
vbKeyReturn 0xD tecla Enter
vbKeyShift 0x10 Tecla SHIFT
vbKeyControl 0x11 Tecla CTRL
vbKeyMenu 0x12 Tecla MENÚ
vbKeyPause 0x13 Tecla PAUSA
vbKeyCapital 0x14 Tecla BLOQ MAYÚS
vbKeyEscape 0x1B Tecla ESC
vbKeySpace 0x20 Barra espaciadora
vbKeyPageUp 0x21 Tecla Re Pág
vbKeyPageDown 0x22 Tecla Av Pág
vbKeyEnd 0x23 Tecla FINAL
vbKeyHome 0x24 Tecla INICIO
vbKeyLeft 0x25 Tecla de cursor izquierda
vbKeyUp 0x26 Tecla de cursor arriba
vbKeyRight 0x27 Tecla de cursor hacia la derecha
vbKeyDown 0x28 Tecla de cursor hacia abajo
vbKeySelect 0x29 Tecla SELECT
vbKeyPrint 0
x2A Tecla Imprimir pantalla
vbKeyExecute 0x2B Tecla EJECUTAR
vbKeySnapshot 0x2C Tecla Instantánea
vbKeyInsert 0x2D Tecla INSERTAR
vbKeyDelete 0x2E Tecla DELETE
p>
vbKeyHelp 0x2F Tecla AYUDA
vbKeyNumlock 0x90 Tecla BLOQ NUM
vbKeyA Tecla de 65 letras A
vbKeyB Tecla de 66 letras B
tecla vbKeyC 67 letra C
vbKeyD tecla 68 letra D
tecla vbKeyE 69 letra E
vbKeyF tecla 70 letra F
vbKeyG Tecla de 71 letras G
vbKeyH Tecla de 72 letras H
vbKeyI Tecla de 73 letras I
vbKeyJ Tecla de 74 letras J
vbKeyK 75 Tecla de la letra K
vbKeyL 76 Tecla de la letra L
vbKeyM 77 Tecla de la letra M
vbKeyN 78 Tecla de la letra N
vbKeyO Tecla de 79 letras O
vbKeyP Tecla de 80 letras P
vbKeyQ Tecla de 81 letras Q
vbKeyR Tecla de 82 letras R
vbKeyS Tecla S de 83 letras
vbKeyT Tecla T de 84 letras
tecla U de 85 letras vbKeyU
tecla V de 86 letras vbKeyV
tecla VbKeyW de 87 letras Tecla W
vbKeyX Tecla de 88 letras X
vbKeyY Tecla de 89 letras Y
vbKeyZ Tecla de 90 letras Z
vbKey0 48 Tecla de número 0
vbKey1 49 Tecla número 1
vbKey2 50 Tecla número 2
vbKey3 51 Tecla número 3
vbKey4 52 Tecla número 4
vbKey5 53 Tecla número 5
vbKey6 54 Tecla número 6
vbKey7 55 Tecla número 7
vbKey8 56 Tecla número 8
vbKey9 57 Tecla número 9
vbKeyF1 0x70 Tecla de función F1
vbKeyF2 0x71 Tecla de función F2
vbKeyF3 0x72 Tecla de función F3
vbKeyF4 0x73 Tecla de función F4
vbKeyF5 0x74 Tecla de función F5
vbKeyF6 0x75 Tecla de función F6
vbKeyF7 0x76 Tecla de función F7
vbKeyF8 0x77 Tecla de función F8
vbKeyF9 0x78 Tecla de función F9
vbKeyF10 0x79 Tecla de función F10
vbKeyF11 0x7A Tecla de función F11
vbKeyF12 0x7B F12 tecla de función
vbKeyF13 0x7C F13 tecla de función
vbKeyF14 0x7D F14 tecla de función
vbKeyF15 0
Tecla de función x7E F15
vbKeyF16 0x7F Tecla de función F16
vbKeyNumpad0 0x60 tecla del teclado numérico 0
vbKeyNumpad1 0x61 tecla del teclado numérico 1
vbKeyNumpad2 0x62 Pequeña teclado con 2 teclas
vbKeyNumpad3 0x63 Teclado pequeño con 3 teclas
vbKeyNumpad4 0x64 Teclado pequeño con 4 teclas
vbKeyNumpad5 0x65 Teclado pequeño con 5 teclas
vbKeyNumpad6 0x66 Teclado pequeño con 6 teclas
vbKeyNumpad7 0x67 Teclado pequeño con 7 teclas
vbKeyNumpad8 0x68 Teclado pequeño con 8 teclas
vbKeyNumpad9 0x69 Teclado pequeño con 9 teclas
vbKeyMultiply 0x6A Teclado pequeño * tecla
vbKeyAdd 0x6B Tecla de teclado pequeño
vbKeySeparator 0x6C Teclado pequeño Tecla Enter
vbKeySubtract 0x6D Pequeño tecla-teclado
p>vbKeyDecimal 0x6E teclado pequeño.key
vbKeyDivide 0x6F teclado/tecla pequeño
La siguiente es la función de retardo, que es la función de retardo (puedes usarlo):
Retraso de función pública (haomiao como doble)
Dim t
t = timeGetTime
Mientras ( timeGetTime - t) lt; haomiao
DoEvents
Sleep 1
Wend
Función final
Si No quiero usar un complemento, está bien, pero creo que es bastante problemático, espero que ayude.
Si tienes alguna duda, puedes preguntarme de nuevo. Es un buen hábito amar el aprendizaje. Aprendamos unos de otros y progresemos juntos.