未分类题

在窗体上画一个命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1 Click() Dim Arr1(12)As Integer, Arr2(3)As Integer Dim Sum As Integer Sum = 2 For i=1 To 12 Arrl(i)= i Next i For i=1 To 3 Arr2(i)= Arrl(i*i) Next i For i = 1 To 3 Sum = Sum + Arr2(i) Next i Print Sum End Sub 程序运行后,单击命令按钮,在窗体上的输出结果为

A.16
B.24
C.32
D.36

【参考答案】

A
解析:本题中定义了两个一维数组,分别为Arr1和Arr2,由于使用了OptionBase1语句,因此其大小分......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)