对窗体编写如下事件过程： Private Sub Form MouseDown(B

问题单项选择题

对窗体编写如下事件过程：
Private Sub Form MouseDown(Button As Integer，Shift As Integer, _
x As Single, Y As Single)
If Button=2 Then
Print "AAA"
End If
End Sub
Private Sub Form MouseUp (Button As Integer，Shift As Integer，_
x As Single，Y As Single)
Print "BBB"
End Sub
程序运行后，如果单击鼠标右键，则输出结果为 ______。

A．AAA
BBB

B．BBB

C．AAA
AAA

D．BBB

答案

参考答案：A

解析：窗体的MouseDown和MouseUp中，Button参数是具有相应于左按钮(位0)、右按钮(位1)，以及中间按钮(位2)的一个位字段。这些位的值分别等于1、2和4。其中仅有一位被设置，指示出引起该事件的那个按钮。本题中MouseDown事件会首先判断按下的是哪个鼠标键，如果是右键则输出AAA。然后在MouseUp事件中输出BBB。