单项选择题

程序运行后，单击命令按钮Command1时的输出结果为( )。
Private Sub Command1_Click()
Dim A(10),B(5)
For i=1 TO 10
A(i)=i
Next i
For j=1 To 5
B(j)=j*20
Next j
A(5)=B(2)
Print "A(5)=";A(5)
End Sub

A．A(5)=5
B．A(5)=10
C．A(5)=20
D．A(5)=40

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个名为Text1的文本框和一个名为Command1的命令按钮。要求：程序运行时，单击命令按钮，能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件Test.dat中，如图所示。请在空格处填上适当的内容，则在以下横线处合适的语句是( )。 Private Sub Command1_Click() Open c: test.dat For______As#1 For i=1 To Len(Text1.Text) Next i Close #1 End Sub

A．Input Print#1,Mid(Text1.Text,i,1)
B．Output Print#1,Mid(Text1.Text,i,1)
C．Output Print#1,Left(Text1.Text,i,1)
D．Output Input#1,Mid(Text1.Text,i,1)

单项选择题

在窗体上画4个文本框，并用这4个文本框建立一个控件数组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写如下事件过程： Private Sub Command1_Click() For Each TextBox In Text1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，4个文本框中显示的内容分别为( )。

A．0 1 2 3
B．1 2 3 4
C．0 1 3 2
D．出错信息

相关试题