单项选择题

在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下事件过程： Private Sub Command1 Click() Dim arr1(10), arr2(10) For i = 1 To 10 arr1(i) = 3 * i arr2(i) = arr1(i) * 3 Next i Text1.Text = Str (arr2(i / 2 - 0.1)) End Sub程序运行后，单击命令按钮，在文本框中显示的是______ 。

A．36
B．45
C．54
D．63
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim Array1(10, 10) As Integer Dim i, j As Interger For i = 1 To 3 For j = 2 To 4 Array1(i, j) = i + j Next j Next i Text1.Text = Array1(2, 3) + Array1(3, 4) End Sub程序运行后，单击命令按钮，在文本框中显示的值是______ 。
A．12
B．13
C．14
D．15
单项选择题
在窗体上画一个命令按钮，名称为Command1，然后编写如下代码： Option Base 0 Private Sub Command1_Click() Dim Al(4) As Integer, A2(4) As Integer For k = 0 To 2 A1(k + 1) = InputBox (“请输入1个整数”) A2(3 - k) = A1(k + 1) Next k Print A2(k) End Sub程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，输出结果为______ 。
A．1
B．2
C．3
D．4
相关试题