如何用VB移动游戏中的人物,代码是什么?
简单的办法就是找一个叫Desert的插件(专门为按键向导设计的模拟按键)。
在VB中的项目菜单底部找到引用,在浏览中找到dm.dll的位置。
然后在VB的通用部分添加代码;
公共函数注册(Dm作为对象)作为对象
壳牌“dm.dll regsvr 32”公司。App。路径与路径。" \dm.dll " '将desert插件注册到系统(App。Path是获取VB程序的路径)。
延迟500
Set Dm = CreateObject("dm.dmsoft ")'创建沙漠插件。
结束功能
然后在要引用的地方添加代码:
“Dim Dm As Object”将Dm声明为控件类型。
打电话
注册dm
以下是dm的几个接口
Dm。这意味着按下A键。
Dm。这意味着按住A键。
Dm。KeyUp 65 '这意味着弹奏A键。
以下是与VB中的键相对应的值:
下列VB键盘代码常量可以在代码中的任何地方使用,而不是实际值:
VB键盘代码常量值
(0x为16,其他为10)键盘描述
VbKeyButton 0x1鼠标左键
VbKeyRButton 0x2鼠标右键
VbKeyCancel 0x3取消键
VbKeyMButton 0x4鼠标中键
VbKeyBack 0x8退格键
VbKeyTab 0x9 TAB键
Vbceyclear 0xcclear键
VbKeyReturn 0xD回车键
VbKeyShift 0x10 SHIFT键
vbkey control 0x 11 ctrl键
VbKeyMenu 0x12菜单键
VbKeyPause 0x13暂停键
VbKeyCapital 0x14大写锁定键
VbKeyEscape 0x1B ESC键
VbKeySpace 0x20空格键
VbKeyPageUp 0x21 Page Up键
VbKeyPageDown 0x22 Page Down键
VbKeyEnd 0x23结束密钥
VbKeyHome 0x24 HOME键
VbKeyLeft 0x25左光标键
VbKeyUp 0x26光标键
VbKeyRight 0x27右光标
VbKeyDown 0x28光标向下键
VbKeySelect 0x29选择键
VbKeyPrint 0x2A打印屏幕键
VbKeyExecute 0x2B执行键
VbKeySnapshot 0x2C快照密钥
VbKeyInsert 0x2D插入密钥
VbKeyDelete 0x2E删除密钥
VbKeyHelp 0x2F帮助键
VbKeyNumlock 0x90数字锁定密钥
VbKeyA 65字母a键
VbKeyB 66字母b键
VbKeyC 67字母c键
VbKeyD 68字母d键
VbKeyE 69字母e键
VbKeyF 70字母f键
VbKeyG 71字母G键
VbKeyH 72字母h键
VbKeyI 73字母I键
VbKeyJ 74字母j键
VbKeyK 75字母k键
VbKeyL 76字母l键
VbKeyM 77字母m键
VbKeyN 78字母n键
VbKeyO 79字母o键
VbKeyP 80字母p键
VbKeyQ 81字母q键
VbKeyR 82字母r键
VbKeyS 83字母S键
VbKeyT 84字母t键
VbKeyU 85字母u键
VbKeyV 86字母v键
VbKeyW 87字母w键
VbKeyX 88字母x键
VbKeyY 89字母y键
VbKeyZ 90字母z键
VbKey0 48数字0键
VbKey1 49数字1键
VbKey2 50数字键2
VbKey3 51数字3键
VbKey4 52数字键4
VbKey5 53数字5键
VbKey6 54数字键6
VbKey7 55数字键7
VbKey8 56数字键8
VbKey9 57数字键9
VbKeyF1 0x70 F1功能键
VbKeyF2 0x71 F2功能键
VbKeyF3 0x72 F3功能键
VbKeyF4 0x73 F4功能键
VbKeyF5 0x74 F5功能键
VbKeyF6 0x75 F6功能键
VbKeyF7 0x76 F7功能键
VbKeyF8 0x77 F8功能键
VbKeyF9 0x78 F9功能键
VbKeyF10 0x79 F10功能键
vbkeyf 110x7af 11功能键
VbKeyF12 0x7B F12功能键
VbKeyF13 0x7C F13功能键
VbKeyF14 0x7D F14功能键
VbKeyF15 0x7E F15功能键
VbKeyF160x7F16功能键
VbKeyNumpad0 0x60键盘0键
vbkeynumbad 1 0x 61键盘1键
VbKeyNumpad2 0x62键盘2个键
VbKeyNumpad3 0x63键盘3个键
VbKeyNumpad4 0x64键盘4个键
VbKeyNumpad5 0x65键盘5个键
VbKeyNumpad6 0x66键盘6个键
VbKeyNumpad7 0x67键盘7个键
VbKeyNumpad8 0x68键盘8个键
VbKeyNumpad9 0x69键盘9个键
VbKeyMultiply 0x6A键盘*键
VbKeyAdd 0x6B键盘+按键
VbKeySeparator 0x6C键盘回车键
VbKeySubtract 0x6D键盘键
VbKeyDecimal 0x6E键盘。键
VbKeyDivide 0x6F键盘/键
下面是延时函数,就是延时函数(你可能需要):
公共函数延迟(郝淼为Double)
Dim t
t = timeGetTime
while(time gettime-t)& lt;浩淼
多项活动
睡眠1
行
结束功能
如果你不想用插件也可以,但是我觉得比较麻烦。希望对你有帮助。
有问题可以再问我。爱学习是个好习惯。让我们互相学习,共同进步。