单项选择题

窗体的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是鼠标向上移动时触发的事件

<上一题目录下一题>

热门试题

单项选择题

以下自定义数据类型的语句中，正确的是( )。

A) Type student
ID As String * 20
name As String * 10
age As Integer
End student
B) Type student
ID As String * 20
name As String * 10
age As Integer
End Type
C) Type student
ID As String
name As String
age As Integer
End student
D) Type
ID As String * 20
name As String * 10
age As Integer
End Type student

单项选择题

窗体上有一个名称为Command1的命令按钮，一个名称为Text1的文本框。编写如下程序： Private Sub Command1_Click() Dim x As Integer x = Val( InputBox ( 输入数据 ) ) Text1 = Str( x + fun(x) + fun(x) ) End Sub Private Function fun(ByRef n As Integer) If n Mod 3 = 0 Then n=n+n Else n=n*n End If fun=n End Function 对于上述程序，以下叙述中错误的是( )。

A) 语句fun=n有错，因为n是整型，fun没有定义类型
B) 运行程序，输入值为5时，文本框中显示655
C) 运行程序，输入值为6时，文本框中显示42
D) ByRef表示参数按址传递

相关试题