在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写以下程序代码: Option Base 1 Private Sub Command1_Click() Dim arr1(4, 4) As Integer Dim

admin2019-06-11  21

问题 在窗体上画一个名称为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中显示的结果为

选项 A、75
B、23
C、57
D、32

答案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。
转载请注明原文地址:https://jikaoti.com/ti/hlN0FFFM
0

最新回复(0)