2. 计算机
  3. 窗体上有一个名称为Command1的命令按钮，并有如下程序代码： Option Base1 Private Sub Command1_Click() Dim a%(3,3) For i=1 To 3 For j=1 To 3 If i＞1Andj＞1The

窗体上有一个名称为Command1的命令按钮，并有如下程序代码： Option Base1 Private Sub Command1_Click() Dim a%(3,3) For i=1 To 3 For j=1 To 3 If i＞1Andj＞1The

admin2016-12-13  37
问题 窗体上有一个名称为Command1的命令按钮，并有如下程序代码：
Option Base1
Private Sub Command1_Click()
Dim a%(3,3)
For i=1 To 3
For j=1 To 3
If i＞1Andj＞1Then
a(i,j)=a(a(i-1,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/35y0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)