在窗体上画—今名称为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)*5/10 Next j Next i s=0 For i=1 To 5 s=s+a(i,i) Next i Print s End Sub D.9
A.15 B.13 C.11
【参考答案】
A 解析:本题是先定义一个5行5列的整型数组,再给数组元素赋值,最后再求数组矩阵中反对角线上的数据元素之和。“\”是整除运算符。