Question

关于Button = 2的问题

这段代码是什么意思？
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 2 Then

PopupMenu mnuClock

End If

End Sub

Answer 1

当单击右键的时候弹出 NAME 属性为 MNUCLOCK 的菜单.

这个事件是弹出式菜单的方法.

在VB编程里有菜单的概念,菜单有分成普通的和弹出的.
普通菜单直接在菜单编辑器里编辑就可以了,弹出式菜单要用POPUPMENU方法实现,但是必须的把主菜单的VISIBLE设置成FALSE

BUTTON=2的含义是按下鼠标右键.

VB 里 对于BUTTON 有几个数字表示它们按下的情况.

1 表示按下 左键
2 表示按下右键
3 表示按下左右键
4 表示按下中间的键 就是那个滚轴.
5表示按下中间键和左键
6表按下中间键和右键
7表示三个键同时按下

根据你的问题,这样回答差不多了吧.?
还有啥不清楚的可以给我发消息.

Answer 2

传递一个Button的整形量，如果Mouse压下会执行这段代码，如果传进来的Button是2就PopupMenu mnuClock

Answer 3

如果单击鼠标右键则弹出右键菜单