对窗体编写如下事件过程: Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single, Y As Single) If Button

admin2009-01-15  36

问题 对窗体编写如下事件过程:    Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,       Y As Single)         If Button = 2 Then            Print"AAAAA"         End If    End Sub    Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,       Y As Single)           Print "BBBBB"    End Sub    程序运行后,如果单击鼠标右键,则输出结果为 ______。

选项 A、AAAAA   BBBBB
B、BBBBB
C、AAAAA
D、BBBBB   AAAAA

答案1

解析 窗体的的MouseDown和MouseUp中,button参数是具有相应于左按钮(为0),右按钮(为1),以及中间按钮(为2)的一个位字段。这些位的值分别等于1,2,和4。其中仅有一位被设置,指示出引起该事件的那个按钮。本题中MouseDown事件会首先判断按下的是哪个鼠标键,如果是右键则输出AAAAA。然后在MouseUp事件中输出BBBBB。
转载请注明原文地址:https://kaotiyun.com/show/Jd2p777K
0

最新回复(0)