更多"在窗体中添加一个名称为Command1 的命令按钮，然后编写如下程序："的相关试题:
[单项选择]在窗体添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码：
Private Sub Commandl Click（ ）
m=2.17
n=Len(Str$(m)+Space)
Me!Textl=n
End Sub
打开窗体运行后,单击命令按钮,在文本框中显示【 】。
A. 5
B. 8
C. 9
D. 10
[单项选择]在窗体中添加一个名称为Command1 的命令按钮，然后编写如下程序：
Public x As integer
Private Sub Command1_Click（）
x＝10
Call s1
Call s2
MsgBox x
End Sub
Private Sub s1（）
x＝x＋20
End Sub
Private Sub s2（）
Dim x As integer
x＝x+20
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为________。
A. 10
B. 30
C. 40
D. 50
[单项选择]在窗体中添加一命令按钮，并在命令按钮中编写如下代码：
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
[单项选择]在窗体中添加一个命令按钮Commandl和一个文本框Text1，编写命令按钮Com-mand1 的 Click事件代码； Private Sub Command1_Click（ ） Dim S As String*20 S=Text1. Text End Sub 该程序的功能是当单击按钮Command1时，把变量S中内容写入一个顺序文件 datl. dar中，正确的程序段是 ( )
A. Open "dat dat", For lnput As#1 Write井1,S
B. Open"dat dat" For Output As#1 Write#1, S
C. Open"dat", For Binary As #1 Write #1, S Close #1
D. Open dat dat"For Random As #1 Write #1, S Close #1
[单项选择]
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Public Eunm s
a=4
b=3
End Enum
Private Sub Command1_Click( )
Dim x As Integer
x=a
If x>=3 Then MsgBox “Pass!”
End Sub
运行程序，其结果是（）。
A. 运行错误，因为Enum定义有错
B. 运行错误，因为x=a类型不匹配
C. 运行正常结束，不显示任何信息
D. 运行正常，显示内容为“Pass！”的信息框
[单项选择]在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1) ，并在命令按钮中编写如下事件代码： Private Sub Commandl_click（ ） m＝2.17 n＝Len(Str$(m) +Space(5) ) Me!Text1＝n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示( )。
A. 5
B. 8
C. 9
D. 10
[单项选择]在窗体上添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，并在命令按钮中编写如下事件代码： Private Sub Commandl Click（ ） m=2.17 n=Len(Str$(m)+Sp2ace(5)) Me!Text1=n EndSub 打开窗体运行后，单击命令按钮，在文本框中显示______。
A. 5
B. 8
C. 9
D. 10
[单项选择]在窗体上添加一个命令按钮，名为Command1，然后为该命令按钮编写如下事件过程，该过程执行结果为______。Option Base 1Private 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 sEnd Sub
A. 4321
B. 1234
C. 34
D. 12
[单项选择]在窗体中添加一个命令按钮(名为Command1) 和一个文本框(名为Text1) ，并在命令按钮中编写如下事例代码： Private Sub Command1_Click( ) Str1="981765" Str2="65" n=InStr(Str1,Str2) Me.Text1=n End Sub 窗体打开运行后，单击命令按钮，在文本框中显示______。
A. 4
B. 5
C. 6
D. 7
[单项选择]在窗体上添加一个命令按钮(名为Conunand1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码： Private Sub Command1_Click（ ） m=2170 n=Len (Str$ (m) +Space (5)) Me! Text1=n End Sub打开窗体运行后，单击命令按钮，在文本框中显示( )。
A. 5
B. 8
C. 9
D. 10
[单项选择]在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，并在命令按钮中编写如下事例代码：
Private Sub Command1 Click( )
m＝2.17
n＝Len(Str $(m) +Space(5) )
Me.Text1＝n
End Sub
窗体打开运行后，单击命令按钮，在文本框中显示______。
A. 5
B. 8
C. 9
D. 10
[单项选择]在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码： Private Sub Command1_Click（ ） m=2.17 n=Len(Str$(m)+Space(5)) Me!Text1=n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示( )。
A. 5
B. 8
C. 9
D. 10
