在窗体上添加一个命令按钮Command1和一个文本框Text1，并在命令按钮的Click事件过程中编写如下代码： Private Sub Command1_Click（) A = 1.2 C = Len（Str$（A) + Space（10)) Text1.Text = C End Sub 程序运行后，单击命令按钮，在文本框中显示（）。A．3B．8C．14D．10
在窗体上添加一个命令按钮Command1和一个文本框Text1，并在命令按钮的Click事件过程中编写如下代码： Private Sub Command1_Click（) A = 1.2 C = Len（Str$（A) + Space（10)) Text1.Text = C End Sub 程序运行后，单击命令按钮，在文本框中显示（）。
A．3
B．8
C．14
D．10
参考答案和解析
C
相关考题：
在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labell，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是 ______。A．27B．28C．29D．30
在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序： 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．0B．5C．6D．7
在窗体上添加一个命令按钮(名为Conunand1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码： Private Sub Command1_Click() m=2170 n=Len (Str$ (m) +Space (5)) Me! Text1=n End Sub打开窗体运行后，单击命令按钮，在文本框中显示( )。A．5B．8C．9D．10
在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1) ，并在命令按钮中编写如下事件代码： Private Sub Commandl_click() m＝2.17 n＝Len(Str$(m) +Space(5) ) Me!Text1＝n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示( )。A．5B．8C．9D．10
在窗体上添加一个命令按钮和一个文本框，并在命令按钮中编写如下代码：PrivateSubCommand1_Click()a=1.2c=Len(Str( )+Space(10))Text1.Text=cEndSub程序运行后，单击命令按钮，在文本框中显示( )A.3B.8C.14D.10
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，编写如下事件过程：Private Sub Command1_Click()Dim x As Integer,y As Integer,z As IntegerCall f(x,y,z)End SubSub f(a As Integer,b As Integer,c As Integer)c=b*aEnd Sub打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
（24）在窗体上有文本框Text1和命令按钮Command1,并有下列事件过程： Private Sub Command1_Click() Dim i As Integer For j=0 To 50 i=i+3 n=n+1 If i10 Then Exit For Next Text1.Text=Str(n) End Sub 单击命令按钮，程序运行后，在文本框中显示的值是 A.2 B.3 C.4 D.5
在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1，然后编写如下代码：Private sub Command1_Click() Text1.text="AB"End SubPrivate Sub Command2_Click() Text1.Text="CD"End Sub 首先单击Command1按钮，然后再单击Command2按钮，在文本框中显示 。A．AB B．CD C．ABCD D．CDAB
在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim a(10,10)As IntegerDim i,j As IntegerFor i=2 To 4For j=3 To 6Next iText1.Text=a(2,3)+a(4,6)End Sub程序运行后，单击命令按钮，在文本框中显示的值是( )。
在窗体中添加一个命令按钮(名为Command1) 和一个文本框(名为Text1) ，并在命令按钮中编写如下事例代码： Private Sub Command1_Click( ) Str1="981765" Str2="65" n=InStr(Str1,Str2) Me.Text1=n End Sub 窗体打开运行后，单击命令按钮，在文本框中显示______。A．4B．5C．6D．7
在窗体上添加一个命令按钮(名为Command1)，然后编写如下程序：Private Sub Command1_Click()Dim a As Integer,b As Integerx=10y=20End Sub打开窗体运行后，单击命令按钮，消息框的输出结果为( )。
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码： Private Sub Command1_Click() m=2.17 n=Len(Str$(m)＋Space(5)) Me!Text1=n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示______。A．5B．8C．9D．10
在窗体上绘制一个名称为Command1的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串： Microsoft Sub Command1_Click() 然后编写如下事件过程： Private Sub Command1_Click() Open "d：\temp\outf.txt" For Output As #1 For i=1 To Len(Text1.Text) c=Mid(Text1.Text，i，1) If c＞="A" And c＜="Z" Then Print #1，LCase(C) End If Next i Close End Sub 程序运行后，单击命令按钮，文件outf.txt中的内容是A．MVBPB．mvbpC．M V B PD．m v b p
在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：Private Sub Command1_Click()Text 1="VB programming"Text 2=Text 1Text 1="ABCD"End Sub程序运行后，单击命令按钮，文本框Text 2中显示的内容为【 】。
在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labe11，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(TextText)+0.5) LabeCaption=Str(x) End Sub 程序运行后，在文本框中输入653，单击命令按钮，标签中显示的内容是______。A．27B．28C．29D．30
在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1，然后编写如下代码： Private Sub Command1 Click() Text1.Text="AB" End Sub Private Sub Command2 Click() Text1.Text="CD" End Sub 首先单击Command1按钮，然后再单击Command2按钮，在文本框中显示A．ABB．CDC．ABCDD．CDAB
在窗体上画一个命令按钮和一个文本框，并把窗体的KeyPreview属性设置为True，然后编写如下代码： Dim SaveAll As String Private Sub Command1_Click() Text1.Text=UCase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAseii) End Sub 程序运行后，在键盘上输入“abcdefg”，单击命令按钮，则文本框中显示的内容为 ______ 。A．abcdefgB．不显示任何信息C．ABCDEFGD．出错
在窗体上面显示一个名称为Text1的文本框和一个名称为Command1的命令按钮，编写如下事件过程： Private Sub Command1_Click() Text1.Text="Visual" ME．Text1="Basic" Text1="Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是______。A．VisualB．BasicC．ProgramD．出错
在窗体中添加一个命令按钮，名称为Command1；添加一个文本框，名称为Text1，然后编写如下程序： Private Sub Commandl Click() Dim a(5)， b(5) For j = 1 To 4 a(j) = 3 ( j b(j) = a(j) ( 3 Next j Text1.Text = b(j\2) End Sub 程序运行后，单击命令按钮，在文本框中显示A．25B．18C．36D．35
在窗体中有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：Private Sub Command1_Click()For I=1 To 4X=3For j=i To 3For k=1 To 2X=x+3Next kNext jNext IText]．value=Str(x)End Sub打开窗体运行后，单击命令按钮，文本框Text1输出的结果是A．6B．12C．18D．21
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序： Private Sub Command1_Click() Dim x，y，z As Integer x=5 y=7 z=0 Text1.Text=" " Call P1(x，y，z) Text1.Text=Str(2) End Sub SubP1(ByVal a As Integer，ByVal b As Integer，c As Integer) c=a+b End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的内容是 ______ 。A．0B．12C．Str(z)D．没有显示
在窗体上有文本框Text1和命令按钮Command1，并有如下事件过程： Private Sub Command1_Click() Dim i As Integer，n As Integer For i=0 To 50 i=i+3 n=n+1 If i＞10 Then Exit For Next Text1.Text=Str(n) End Sub 单击命令按钮，程序运行后，在文本框中显示的值是( )。A．2B．3C．4D．5
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是A． VisualB．BasicC．ProgramD．出错
在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1，然后编写如下代码： Private Sub Command1_Click( ) Text1.Text="AB" End Sub Private Sub Command2_Cliek( ) Text1.Text="CD" End Sub 首先单击Command1按钮，然后再单击Command2按钮，在文本框中显示A．ABB．CDC．ABEDD．CDAB
在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮，编写如下事件过程： Private Sub Command1_Click() Text1.Text=“计算机” Me.Text1=“等级” Text1=“考试” End Sub 程序运行后．如果单击命令按钮，则在文本框中显示的是A．计算机B．等级C．考试D．出错
在窗体上画一个名为Command1的命令按钮和一个名为Text1的文本框，并把窗体的 KeyPreview 属性设置为True，然后编写如下代码： Dim SaveAll As String Private Sub Form_ Load () Show Text1.Text = " " TextSetFocus End Sub Private Sub Command1 Click() TextText= LCase(SaveAll) End Sub Private Sub Form_ KeyPress (KeyAscii As Integer) SaveAll = SaveAll + Chr(KeyAscii) End Sub程序运行后，在键盘上输入ABCDEFG，单击命令按钮，则文本框中显示的内容为 ______。A．abodefgB．不显示任何信息C．ABCDEFGD．出错
在窗体中绘制两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：Private Sub Command1_Click()Text1＝"VB programming"Text2＝Text1Text1＝"ABCD"End Sub程序运行后，单击命令按钮，文本框Text2中显示的内容为【 】。
（ 32 ） 在窗体上添加一个命令按钮 （ 名为 Command1 ） 和一个文本框 （ 名为 Text1 ） ， 并在命令按钮中编写如下事件代码：Private Sub Command1_Click( )m=2.17n=Len(Str$(m)+Space(5))Me!Text1 =nEnd Sub打开窗体运行后，单击命令按钮，在文本框中显示A ） 5B ） 8C ） 9D ） 10