[单项选择题] 在窗体上画—今名称为Cmmand1的命令按钮,然后编写如下事件过程 Option base 1 Private Sub Command1_Click() Dim a(5,5)As Integer For i=1 To 5 For j=1 To 5 a(i,j)=(i+j)*510 Next j Next i s=0 For i=1 To 5 s=s+a(i,i) Next i Print s End Sub
A.15
B.13
C.11
D.9
参考答案:
A问题解析:
[评析] 本题是先定义一个5行5列的整型数组,再给数组元素赋值,最后再求数组矩阵中反对角线上的数据元素之和。“”是整除运算符。

![[单项选择题] 在窗体上画—今名称为Cmmand1的命令按钮,然后编写如下事件过程 Option Base 1 Private Sub Command1_Click() Dim a(5,5)As [单项选择题] 在窗体上画—今名称为Cmmand1的命令按钮,然后编写如下事件过程 Option Base 1 Private Sub Command1_Click() Dim a(5,5)As](http://www.mshxw.com/aiimages/31/261741.png)
