Question

VB鼠标左右键同时按下的事件怎么写？

我现在已经做了一个软件。软件运行后可以隐藏的。隐藏后我想同时按下鼠标左右键则显示出软件窗体。请问Vb怎样去判断鼠标左右键同时按下呢？

Answer 1

'引用这个api
private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Private Sub TimKey_Timer()
'

LButton = CBool(GetAsyncKeyState(vbLeftButton)) '鼠标左键状态
RButton = CBool(GetAsyncKeyState(vbRightButton)) '鼠标右键状态

if LButton=true and RButton=true then .......

试试看行不行

Answer 2

???????关注。。。。

Answer 3

软件界面是隐藏的话，最好用全局的鼠标钩子实现比较好