窗体上有一个名称为Commandl的命令按钮,并有如下程序代码: Option Base 1 P1.ivate Sub Command 1.Click() Dim a%(3,3) For i=1 To 3 Forj=1 To 3 Ifi>1 Andj>1

admin2018-10-18  29

问题 窗体上有一个名称为Commandl的命令按钮,并有如下程序代码:
Option Base 1
P1.ivate Sub Command 1.Click()
Dim a%(3,3)
For i=1 To 3
Forj=1 To 3
Ifi>1 Andj>1 Then
a(i,j)=a(a(i—l,j一1),a(i,j—1))+1
Else
a(i,j)=i*j
End If
Next
Next
Print a(2,2);a(3,3)
End Sub
运行程序,单击命令按钮,窗体上显示的是

选项 A、1 3
B、2 1
C、2 2
D、3 3

答案D

解析 本题是一个二维数组的赋值问题,要判断清哪一个数组元素的值被赋值成了多少。首先确定a(1,1)=1,a(1,2)=2,a(1,3);3,a(2,1)=2,a(3,1)=3;然后按照公式计算其余的元素。
转载请注明原文地址:https://jikaoti.com/ti/PIm0FFFM
0

最新回复(0)