一个鼠标的问题

twtyypeuxk 2004-05-08 08:17:53
VB怎么判断鼠标按下的是了左键或右键啊!!
...全文
16 7 点赞 打赏 收藏 举报
写回复
7 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
goodname008 2004-05-09
全局钩子,需要写标准DLL,用VC做好一些。
  • 打赏
  • 举报
回复
twtyypeuxk 2004-05-09
楼上的这位兄弟,你判断的是键盘的事件,我要的是鼠标的事件啊~~
  • 打赏
  • 举报
回复
broown 2004-05-09
在VC中有个消息响应函数PreTranslateMessage(MSG* pMsg)它负责响应WM_HOTKEY消息。
在VB中GetAsyncKeyState (API)
但前提条件,这个函数你必须放到Timer1_Timer()里,它可以捕捉你的按键(keycode值)

下面是一个对Ctrl+Alt+S的捕捉
Private Sub Timer1_Timer()
Dim back_ctrl, back_alt, back_S As Long
'定义back_ctrl等变量来接收返回值

back_ctrl = GetAsyncKeyState(17) '“17”为“ctrl”键的keycode值
back_alt = GetAsyncKeyState(18) '“18”为“alt”键的keycode值
back_S = GetAsyncKeyState(83) '“83”为“S”键的keycode值

If back_ctrl < 0 And back_alt < 0 And back_S < 0 Then
'判断ctrl和alt和S键是否同时被按下
Shell "C:\Winnt\system32\NOTEPAD.exe", vbNormalFocus
'用shell函数来运行指定的“记事本”程序
End If
End Sub
  • 打赏
  • 举报
回复
ryuginka 2004-05-08
有API函数的,但是我不记得了,顶
  • 打赏
  • 举报
回复
twtyypeuxk 2004-05-08
我不是这个意思!我是想在我的程序外按鼠标左键或右键,然后再在我的程序中显示我按下的是左键还是右键,还有一个问题就是怎么把这个鼠标事件给删除了,让系统不响应呢!
  • 打赏
  • 举报
回复
goodname008 2004-05-08
常数是
vbLeftButton
vbRightButton
  • 打赏
  • 举报
回复
daisy8675 2004-05-08
button=1是左
button=2是右
  • 打赏
  • 举报
回复
相关推荐
发帖
VB基础类
加入

7545

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2004-05-08 08:17
社区公告
暂无公告