[单选题]

窗体的MouseUp事件过程如下:
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single,Y As Single)
……
End Sub
关于以上定义,以下叙述中错误的是(   )。

A.根据Shift参数,能够确定使用转换键的情况

B.根据X、Y参数可以确定触发此事件时鼠标的位置

C.Button参数的值是在MouseUp事件发生时,系统自动产生的

D.MouseUp是鼠标向上移动时触发的事件

参考答案与解析:

相关试题

编写如下事件过程:<br />Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)<br />Print

[单选题]编写如下事件过程:Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)Print

  • 查看答案
  • 若看到程序中有以下事件过程,则可以肯定的是,当程序运行时(  )。<br />Private Sub Click_MouseDown(Button As Integer,Shift As

    [单选题]若看到程序中有以下事件过程,则可以肯定的是,当程序运行时(  )。Private Sub Click_MouseDown(Button As Inte

  • 查看答案
  • 现有程序如下:Option Base 1<br />Private Sub Form_Click()<br />Dim x(5,6)As Integer,y(5)As Inte

    [单选题]现有程序如下:Option Base 1Private Sub Form_Click()Dim x(5,6)As Integer,y(5)As Int

  • 查看答案
  • 对窗体编写如下事件过程:Private Sub Form_ MouseDown(

    [单选题]对窗体编写如下事件过程: 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” E

  • 查看答案
  • 对窗体编写如下事件过程:Private Sub Form. _ MouseDow

    [单选题]对窗体编写如下事件过程: Private Sub Form. _ MouseDown(BuRon 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 "BBBB

  • 查看答案
  • 有如下过程代码:<br />Sub var_dim( )<br />Static numa As integer<br />Dim numb As Integer&

    [单选题]有如下过程代码:Sub var_dim( )Static numa As integerDim numb As Integernuma=numa+2n

  • 查看答案
  • 设有如下窗体单击事件过程: Private Sub Form_Click() a

    [单选题]设有如下窗体单击事件过程: Private Sub Form_Click() a=1 For i=1 To 3 Select Case i Case 1,3 a=a+l Case2,4 a=a+2 End Select Next i MsgBox a End Sub 打开窗体运行后,单击窗体,则消息框的输出结果是______。A.3B.4C.5D.6

  • 查看答案
  • 对窗体编写如下事件过程: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 "AAAAA" End If End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single, Y As Single) Print "BBBBB"

  • 查看答案
  • 对窗体编写如下事件过程:Private Sub Form_ Mouse Down

    [单选题]对窗体编写如下事件过程: Private Sub Form_ Mouse Down(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 "BBBB

  • 查看答案
  • 对窗体编写如下事件过程:Private Sub Form_MouseDown(B

    [单选题]对窗体编写如下事件过程:Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single Y As Single)If Button=2ThenPrint"AAAAA"EndIfEndSubPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)Print"BBBBB&quo

  • 查看答案