单选题 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写以下程序代码:
Option Base 1
Private Sub Command1_Click( )
Dim arr1(4, 4) As Integer
Dim i As Integer, j As Integer
For i = 1 To 2
For j = 2 To 3
arr1(i, j) = i+j * 10
Next j
Next i
Text1. Text = arr1(2, 3) + arr1(3, 4)
End Sub
运行程序,单击Command1,则在文本框Text1中显示的结果为______。
【正确答案】 D
【答案解析】[解析] 程序开头定义了Option Base 1这时定义二维数组下标从1开始;arr1(1,2) =1+2 * 10=21;arr1(1,3) =1+3 * 10=31;arr1(2,2) =2+2 * 10=22;arr1(2,3) =2+3 * 10=32;整型数组中未定义的数组元素值均默认为0。故arr1(2,3)+arr1(3,4) =32+0=32;本题正确答案为D。