vb里的鼠标事件问题
第一个if我懂,但是为什么在两个elseif地方,不是button=7而是(buttonand7)=7呢?...
第一个if我懂,但是为什么在两个elseif地方,不是button=7 而是(button and 7)=7呢?
展开
3个回答
展开全部
翘腿尿尿学狗怪呗。这么用纯粹吃饱撑的。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
不就是想在鼠标移动时判断鼠标键的按下状态吗,不用这么纠结,看代码。
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Select Case Button
Case vbKeyLButton
Text1 = "Left"
Case vbKeyRButton
Text1 = "Right"
Case vbKeyMButton
Text1 = "Middle"
Case vbKeyLButton + vbKeyRButton + vbKeyMButton
Text1 = "Left and Right and Middle"
End Select
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Select Case Button
Case vbKeyLButton
Text1 = "Left"
Case vbKeyRButton
Text1 = "Right"
Case vbKeyMButton
Text1 = "Middle"
Case vbKeyLButton + vbKeyRButton + vbKeyMButton
Text1 = "Left and Right and Middle"
End Select
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询