单项选择题

在窗体上画一个文本框，然后编写如下程序：
Option Base 1
Private Sub Form_Click(
)
Dim Arr(10)As Integer
　　For i = 6 To 10
　　　　Arr(i)= i - 3
　　Next i
　　Text1.Text = Str(Arr(6)+ Arr(Arr(6)+ Arr(10)))
End Sub
程序运行后，单击窗体，在文本框中显示的内容是________。

A．1
B．3
C．6
D．10
<上一题 目录 下一题>
热门 试题

单项选择题
窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4内容，有下列程序： Private Sub Command1_Click( ) Dim i， s For i = 0 To List1.ListCount s = s + List1.List(i) Next i Print s End Sub 程序运行后，单击命令按钮，则窗体上显示的是________。
A．0
B．10
C．01234
D．程序出错
单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim x(5)As String Dim n As Integer For n = 4 To 0 Step -1 x(n)= n + 1 Print x(n); Next n End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是________。
A．54321
B．4
C．5 4 3 2 1
D．0
相关试题