更多"在窗体中添加一个名称为Commandl的命名按钮，然后编写如下程序： "的相关试题:
[单项选择]在窗体中添加一个名称为Commandl的命名按钮，然后编写如下程序：
Private Sub Command1 Click（ ）
Print Tab(1)；“第一”
Print Tab(6)；“第二”
End Sub
程序运行后，如果单击命令按钮，在窗体上显示的内容是(口表示空格)
A. 第一□□第二
B. 第一第二□□
C. 第一□□
D. 第一□□
[单项选择]
在窗体中有一个名为Commandl的命令按钮，事件代码如下：
Private Sub Command1_Click( )
Dim m(10)
For k = 1 T0 10
m(k) = 11 - k
Next k
x = 6
MsgBox m(2+m(x))
End Sub
打开窗体，单击命令按钮，消息框的输出结果是（）。
A. 2
B. 4
C. 3
D. 5
[单项选择]单击窗体上Commandl命令按钮时，执行如下事件过程： Private Sub Commandl _ Click（ ） a＄="software and hardware" b＄=Right(a＄,8) c＄=Mid(b＄,1,8) Msgbox c＄ End sub 则在弹出的信息框的标题栏中显示的信息是( )。
A. software and hardware
B. software
C. hardware
D. and
[单项选择]在窗体中添加一个命令按钮，名称为Commandl，然后编写如下程序： Private Sub Command1_Click（ ） Dim a As Integer，b As String，C As Integer a = 1234 : b = Str(a) c = Len(b) Print c End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是
A. 0
B. 5
C. 6
D. 7
[单项选择]在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码： Private Sub Commandl_Click（ ） A＝75 IfA<60 Then x＝1 IFA<70 Then x＝2 IfA<80 Then x＝3 IFA<90 Then x＝4 MsgBox x End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是( )。
A. 1
B. 2
C. 3
D. 4
[单项选择]在窗体中添加一命令按钮，并在命令按钮中编写如下代码：
Private Sub Commandl_C1ick（ ）
Dim a As Single
a=-1.234567
b=Int(
A. -2 1.234 567
B. -1 1.234 567 -1
C. -1 -1.234 567 -1
[单项选择]在窗体画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click（ ） Dim a(5)As String For i=1 To 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后，单击命令按钮，输出结果是______。
A. ABCDE
B. 1 2 3 4 5
C. abcde
D. 出错信息
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl Click（ ）
Dim a（ ）
a＝Array(1，3，5，7)
s=O
For i＝1 TO 3
S=S*10十a(i)
Next i
PrInt S
End Sub
程序运行后，输出结果为( )。
A. 135
B. 357
C. 531
D. 753
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click（ ） Dim a（ ） a=Array(1,3,5,7) s=0 For i=1 To 3 S=S*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。
A. 135
B. 357
C. 531
D. 753
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click（ ） Dim a（ ） a＝Array(1，3，5，7) s=O For i＝1 TO 3 S=S*10十a(i) Next i PrInt S End Sub 程序运行后，输出结果为( )。
A. 135
B. 357
C. 531
D. 753
[单项选择]在窗体上画一个命令按钮，然后编写如下程序：
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
