VB程序中mousedown函数的一个问题?

2020-04-30 科技 66阅读
这是个事件,不是函数。事件意味着当鼠标按下时,系统会自动调用这个过程。
你在处理这个事件时可能需要知道是按下了哪个键(button参数,比如鼠标左键,右键或者中键),是否同时按下了控制键(shift参数,比如Shift键,Ctrl键,Alt键)
参数的用法,用AND比较:
if button AND vbLeftButton Then '按下的是鼠标左键
If Shift AND vbKeyCtrl Then '按下了Ctrl键
这个两个参数可以组合判断,比如:
if (button AND vbRightButton) and (shift AND vbKeyShift) Then '按下 Shift 的同时点击右键
if (button AND vbLeftButton) and (button AND vbRightButton) Then '同时按下左右键,通常等同于中键
这两个都是以二进制表示的参数,每一位表示一个按键,可以完美的表示按键组合,比如:
vbLefttButton = 1 '00000001
vbRightButton = 2 '00000010
那么要表示左右键同时按下就是
vbRightButton + vbLefttButton = 3 '00000011
在判断时可以独立的判断某个键是否按下
if button AND vbLeftButton Then '按下了鼠标左键
if button = vbLeftButton Then '按下的仅仅是鼠标左键
也可以用多种方法判断按键组合
if (button AND vbLeftButton) and (button AND vbRightButton) Then
if button = (vbLeftButton+ vbRightButton) Then
if button =3 Then
声明:你问我答网所有作品(图文、音视频)均由用户自行上传分享,仅供网友学习交流。若您的权利被侵害,请联系fangmu6661024@163.com