更多"在窗体上添加一个命令按钮(名为Commandl) ，然后编写如下事件过"的相关试题:
[填空题]在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件过程：
Private Sub Commandl_Click（ ）
Dim b,k
For k=1 to 6
b=23+k
Next k
MsgBox b+k
End Sub
打开窗体运行后,单击命令按钮,消息框的输出结果是【 】。
[单项选择]在窗体上添加一个命令按钮(名为Commandl) ，然后编写如下事件过程：
Private Sub Commandl_click（ ）
For i＝1 To 4
x＝4
For j＝1 To 3
x＝3
For k＝1 To 2
x＝x+6
Next k
Next j
Next i
MsgBox x
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是( )。
A. 7
B. 15
C. 157
D. 528
[单项选择]在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码：
Private Sub Command1_Click（ ）
m=2.17
n=Len(Str$(m)+Space(5))
Mc! Text1=n
End Sub
打开窗体运行后，单击命令按钮，在文本框中显示( )。
A. 5
B. 8
C. 9
D. 10
[单项选择]在窗体上添加一个命令按钮，名为Command1，然后为该命令按钮编写如下事件过程，该过程执行结果为______。
Option Base 1
Private Sub Cemmand1_Click（ ）
Dim a As Variant
a = Array(1, 2, 3, 4)
j = 1
for i = 4 To 1 Step - 1
s = s+ a(i)* j
j= j* 10
Next i
Print s
End Sub
A. 4321
B. 1234
C. 34
D. 12
[填空题]在窗体上画一个命令按钮，然后编写如下代码：
Private Sub Commandl_Click（ ）
Dim M(10) As Integer
For k=1 To 10
M(k)=12-k
Next k
x=6
Msgbox M(2+M(x))
End Sub
程序运行后，单击命令按钮，消息框显示的是 。
[填空题]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl Click（ ）
Do Until b＜0
a=InputBox("输入a的值")
a=Val(a)
b=InputBox("输入b的值")
b=Val(b)
a=a +b
Loop
Print a
End Sub
程序运行后，依次输入5，4，3，2，1，0，-1，-2，则输出结果是 【14】 。
[填空题]在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：
Private Sub Command1_Cliek
Dim b, k
For k = 1 to 6
b=23+k
Next k
MsgBox b + k
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是 【15】 。
[单项选择]在窗体上画一个命令按钮，然后编写如下程序：
Private Sub Commandl_Click( )
Dim a AS Integer，b As Integer
a=15
b=2
t N(a，b)
End Sub
Function N(x As Integer，y As Integer) As Integer
N=IIf(x)y，x，y)
End Function
程序运行后，单击命令按钮，输出结果为
A. 1
B. 2
C. 15
D. 8
[填空题]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click（ ）
Do Until b【14】。
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click（ ）
Dim a(5)As String
Fori=1 To 5
a(i)=Chr(Asc("A")+(11))
Nexti
For Each b In a
Print b
Next
End Sub
程序运行后，单击命令按钮，输出结果是( )。
A. ABCDE
B. 1 2 3 4 5
C. abcde
D. 出错信息
