vb中的一些编程看不懂

来源:百度知道 编辑:UC知道 时间:2024/09/24 22:55:16
Private Sub Form_MouseDown(Button As Integer,Shift As Integer, _X As Single,Y As Single)
If (Button = vbLeftButton ) Or (Button =vbRightButton )
Then PopupMenu a1
End If
End Sub
中的 If (Button = vbLeftButton ) Or (Button =vbRightButton )Then PopupMenu a1 什么意思

If (Button = vbLeftButton ) Or (Button =vbRightButton ) Then '鼠标左键或鼠标右键按下,也可以直接用数字代替,如Button=1 or Button=2即左键和右键,中键为4
PopupMenu a1 '弹出工菜单a1
End If

vbLeftButton 左键按下
vbRightButton 右键按下

PopupMenu 弹出式菜单

按鼠标左键或右键,弹出菜单