更多"下列事件过程：Private Sub Command1_ Click（"的相关试题:
[判断题]事件过程与sub过程，它们相同点都是事件的驱动，而不同的只是事件过程由控件属性决定，而sub过程是由户自定义。
[单项选择]有如下事件过程：
Private Sub Command1_Click( )
Dim m AS Integer，n AS Integer
m=2：n=1
Print "m="；m；"n="；n
Call TOD(m，n)
Print "m="；m；"n="；n
End Sub
Sub TOD(x，y)
x=x^2
y=y^3
End Sub
程序运行后，输出的结果为( )。
[单项选择]有如下事件过程： Private Sub Commaild1_Click( ) Dim i As Integer For i =1 To 2 DC Next i End Sub Sub DC( ) Dim x As Integer，m As String Static y，n x=x + 1 y=y + 1 m=m&"*"：n=n &"#" Print x，y，m，n End Sub 程序运行后，输出的结果是
A. 1 1 * # 1 1 * #
B. 1 1 * # 1 2 * #
C. 1 1 * # 1 1 * ##
D. 1 1 * # 1 2 * ##
[单项选择]假定有如下事件过程： Private Sub Form Click（ ） Dim x As Integer, n As Integer x=1 n=0 Do While x＜28 x=x*3 n=n+1 Loop Print x, n End Sub 程序运行后，单击窗体，输出结果是______。
A. 81 4
B. 56 3
C. 28 1
D. 243 5
[单项选择]假定有如下的窗体事件过程： Private Sub Form_Click( ) a$="Microsoft Visual Basic" b$=Right(a$，5) c$=Mid(a$，1，9) Msg Box aS，34，b$，c$，5 End Sub 程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是
A. Microsoft Visual
B. Microsoft
C. Basic
D. 5
[单项选择]有如下事件过程： Private Sub Command1_Click( ) Dim m AS Integer，n AS Integer m=2：n=1 Print "m="；m；"n="；n Call TOD(m，n) Print "m="；m；"n="；n End Sub Sub TOD(x，y) x=x^2 y=y^3 End Sub 程序运行后，输出的结果为
A. m=2，n=1 m=1，n=2
B. m=2，n=1 m=4，n=1
C. m=1，n=2 m=1，n=4
D. m=1，n=2 m=2，n=4
[单项选择]有如下事件过程：
Private Sub Command1_Click（ ）
b=10
Do Until b=-1
a=InputBox("请输入a的值")
a=Val(a)
b=InputBox("请输入b的值")
b=Val(b)
a=a * b
Loop
Print a
End Sub
程序运行后，依次输入数值30，20，10，-1，输出结果为（ ）。
A. 6000
B. -10
C. 200
D. -6000
[单项选择]假定有如下事件过程： Privte Sub Form_Click（ ） Dim x As Integer，n As Integer x=1 n=0 Do While x＜28 x=x*3 n=n+1 Loop Print x，n End Sub 程序运行后，单击窗体，输出结果是
A. 81 4
B. 56 3
C. 28 1
D. 243 5
