更多"在窗体上画一个命令按钮，其名称分别为Command1，然后编写如下事件"的相关试题:
[单项选择]在窗体上画一个命令按钮，其名称分别为 Command1，然后编写如下事件过程：
Private Sub Command1_Click( )
a = 0
For m = 1 To 10
a = a + 1
b = 0
For j = 1 To 10
a = a + 1
b = b + 2
Next j
Next m
Print a， b
End Sub
程序运行时，单击命令按钮Command1后，窗体上显示的结果为________。
A. 10 20
B. 20 110
C. 110 20
D. 200 110
[填空题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序：
Private Sub Command1_Click（ ）
Dim a(10)As Integer
Dim x As Integer
For i=1 To 10
a(i)=i
Next i
x=1
MsgBoxa(f(x)+x)
End Sub
Function f(y As Integer)
y=y+2
f=y
End Function
程序运行后，单击命令按钮，消息框的输出结果为______。
[填空题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序：
Private Sub Command1_Click（ ）
Dim a(10)As Integer
Dim x As Integer
For i=1 To 10
a(i)=i
Next i
x=1
MsgBoxa(f(x)+x)
End Sub
Function f(y As Integer)
y=y+2
f=y
End Function
程序运行后，单击命令按钮，消息框的输出结果为______。
[单项选择]在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click( )
Dim i As Integer，x As Integer
For i=l To 6
If i=1 Then x=i
lf i＜=4 Then
x=x+1
Else
x=x+2
End lf
Next i
Print x
End Sub
程序运行后，单击命令按钮，其输出结果为
A. 9
B. 6
C. 12
D. 15
[填空题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click（ ）
Dim arr(1 To 100) As Integer
For i=1 To 100
arr(i)=Int(Rnd*______)
Next i
Max=arr(1)
Min=arr(1)
For i=1 To 100
If______Then
Max=art(i)
End If
If______Then
Min=arr(i)
End If
Next i
MsgBox Max
MsgBox Min
End Sub
程序运行后，单击命令按钮，将产生100个1000以内的随机整数，放入数组arr中，然后查找并先后使用消息框输出这100个数中的最大值Max和最小值Min，请填空。
