九色国产,午夜在线视频,新黄色网址,九九色综合,天天做夜夜做久久做狠狠,天天躁夜夜躁狠狠躁2021a,久久不卡一区二区三区

把按鍵精靈幾十個(gè)命令做成模塊直接在vb里使用，這樣可以把按鍵精靈的腳本文件直接復(fù)制到VB里運(yùn)行，并制作成vb的.exe文件。同樣vb命令也可以做成插件在按鍵精靈運(yùn)行，這樣按鍵精靈和vb互相共用是不是很方便哦。
例子：移動(dòng)鼠標(biāo)到 100，100，左鍵點(diǎn)擊3下
按鍵精靈命令是：
MoveTo 100,100
LeftClick 3
在vb里建一個(gè)模塊：
Public Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Public Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
'移動(dòng)鼠標(biāo)
Public Function MoveTo(ByVal x As Long, ByVal y As Long)
Call SetCursorPos(x, y)
End Function
'鼠標(biāo)左鍵點(diǎn)擊x次
Public Function LeftClick(ByVal x As Long)
Dim i As Long
For i = 1 To x
    mouse_event &H2 Or &H4, 0, 0, 0, 0
Next
End Function

測(cè)試：在vb建一個(gè)命令按鍵,把按鍵精靈命令復(fù)制到vb里
Private Sub Command1_Click()
MoveTo 100,100
LeftClick 3
End Sub
怎么樣，方便把，把vb命令做成插鍵，論壇上很多，自己找吧就不多說(shuō)了。
這樣命令在按鍵精靈和vb里怎么用都可以不會(huì)搞錯(cuò)用的地方了。