vbs 后台模拟按键

不是vbs脚本语言无法实现模拟按键，是没有调用模拟按键的组件，用vb做个ActiveX控件，把用到的AIp写在里面，然后用vbs调用就是了。鼠标用到的ApiGetCursorPos获取鼠标在屏幕的坐标SetCursorPos设置鼠标在屏幕的坐标mouse_event模拟鼠标点击

用VBS很难实现，比较复杂。你可以看看这个

>

Plugin BGKM5LClick(w,x,y)

BGKM5是什么东西

这句系统根本就没认

==========================================================

不是带入不进去，你那语句没问题。就是你那个BGKM5我没明白什么意思。都没翻译出来是什么

==========================================================

哎，别用乱七八糟的东西。。一些游戏就把这些命令给封了。如果对其他窗口可以而对游戏不行，说明是游戏的问题，你也没辙。

VBS只能在网页中对屏幕取色，不支持在window界面对屏幕取色

按键精灵倒是可以实现你的需求

IfColor 452,556,"FF00000",0 Then

    EndScript

Else

    xxxxx 

End If

如果屏幕坐标452,556颜色是FF0000则退出，

如不是则执行xxxx语句。

把xxxx替换为你想判断执行的语句即可。

如果后面执行的程序有很多行，可以写成这样：

IfColor 452,556,"FF00000",0 Then

    EndScript

End If

xxxx

xxxx

xxxx

Plugin ck=WindowGetKeyFocusWnd()

Delay 15

Plugin WindowSendKeyPress(ck,65)

Delay 15

Plugin BGKM5LClick(ck,526,284)

Delay 20

For 3

Plugin WindowSendKeyPress(ck,27)

Delay 20

EndFor

修改：忘了说，526,284是屏幕坐标，你需要把它改成窗口坐标。把鼠标移到点击处，用下面的脚本获取窗口坐标。

Plugin hw=WindowMousePoint()

//获取当前窗口句柄

VBSCall GetCursorPos(x,y)

//获取鼠标当前屏幕绝对坐标

Plugin winxy=BGKM5ScrToCli(hw,x,y)

//换算鼠标当前屏幕绝对坐标－－>鼠标相对于窗口的坐标，以“X|Y”格式的字符串表示

VBS StrXY_len = InStr(winxy,"|")

VBS wdx=Left(winxy,StrXY_len-1)

wdx=int(wdx)

VBS wdY=Right(winxy,StrXY_len-1)

wdy=int(wdy)

MessageBox wdx&","&wdy

以上就是关于vbs 后台模拟按键全部的内容，包括:vbs 后台模拟按键、vbs 脚本 代码 改变 鼠标 坐标、按键精灵,给鼠标变量赋值的问题等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！