在窗体上添加一个命令按钮和一个文本框，并在命令按钮中编写如下代码：

PrivateSubCommand1_Click()

a=1.2

c=Len(Str( )+Space(10))

Text1.Text=c

E．ndSub

程序运行后，单击命令按钮，在文本框中显示( )

A．3

B．8

C．14

D．10

[单选题]在程序中添加一个命令按钮和两个文本框，并在命令按钮中编写如下代码： Private Sub Command1_Click() a=Text1．Text b=Text2．Text c=LCase (A．d=UCase (B)Print c；d End Sub程序运行后，在文本框中分别输入ABCD和efgh，结果是______。A．abcdEFGHB．abcdefghC．ABCDefghD．ABCDEFGH

[单选题]在窗体中添加一个命令按钮，然后编写如下代码： Private Sub Command1_Click( ) For i=l To 4 x=4 For j=1 To 3 x=3 For k=l To 3 x=x+6 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮，输出结果是A．7B．15C．21D．538

[单选题]在窗体中添加一命令按钮，并在命令按钮中编写如下代码： Private Sub Commandl_C1ick() Dim a As Single a=-1.234567 b=Int(A)c=Sgn(A)d＝Abs(A)e=Fix(A)If a＜b Then Print b： If a＜c ThenPrint c； H a＜d ThenPrint d； H a＜e Then Print e; Print End sub 运行后输出结果是 ( )A．-2 -1 1.234 567 -1B．-2 1.2

[单选题]在窗体中添加一个命令按钮Commandl和一个文本框Text1，编写命令按钮Com-mand1 的 Click事件代码； Private Sub Command1_Click() Dim S As String*20 S=TextText End Sub 该程序的功能是当单击按钮Command1时，把变量S中内容写入一个顺序文件 datl. dar中，正确的程序段是 ( )A．Open "datl. dat", For lnput As#1 Write井1,SB．Open"datl. da

[单选题]在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：Private SuB cormmandl_Click()D．im i,j,xF．or i=i To 20 step 2x=0F．or j=1 To 20 step 2x=x+1Next jNext iText1.Value=Str(x)E．nd SuB打开窗体运行后，单击命令按钮，文本框中显示的结果是A．1B．7C．17D．400

[单选题]在窗体中有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：F．or i=1 T04X=3F．or j=1 T03F．or k=1 T02x=x+3Next kNext jNext iText1．Value=Str(x)E．nd Sub打开窗体运行后，单击命令按钮，文本框Text1中输出的结果是（ ）。A．6B．12C．18D．21

[单选题]在窗体上画一个命令按钮，然后编写如下代码： Private Type Record ID As Integer Name As String * 20 End Type Private Sub Command1_Click( ) Dim MaxSize, NextChar, MyChar Open "d:/vb/tt. txt" For Input As #1 MaxSize = LOF(1) For NextChar = MaxSize To 1 Step - 1 Seek # 1, Ne

[单选题]在窗体上画一个命令按钮，然后编写如下代码： Private Type Record ID As Integer Name As String*20 End Type Private Sub Command1_Click() Dim MaxSize.NextChar，MyChar Open"D:/temp/female.txt"For Input As #1 MaxSize=LOF(1) For NextChar=1 To MaxSize Seek#1，NextChar MyChar=Inpu

[单选题]在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command1 Click() a&＝InputBox("请输入第一个数") b&=InputBox("请输入第二个数") Print b&+a& End Sub 程序运行后，单击命令按钮，在两个输入对话框中先后输入12345和54321，程序的输出结果是A．66666B．5432112345C．1.23455e+009D．出错

[单选题]在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command1_Click() 0pen "d：/vb/test.txt "For Input As #1 Print LOF(1) Close #1 End Sub 假设文件d:/vb/test.txt的内容为I am a student．，那么程序运行后，单击命令按钮，其输出结果为______.A．13B．14C．15D．16