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

问题单项选择题

对窗体编写如下事件过程： Private Sub Form MouseDown(Button As Integer，Shift As Integer, _x As Single, Y As Single) If Button=2 ThenPrint "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。