2. 计算机
  3. 设有如下程序： Option Base1 Dim a(3，4)As Integer，b(4，3)As Integer Private Sub Command1_Click()’循环1 For i=1To3 For j=1To4 b(j，i)=a(i，j)

设有如下程序： Option Base1 Dim a(3，4)As Integer，b(4，3)As Integer Private Sub Command1_Click()’循环1 For i=1To3 For j=1To4 b(j，i)=a(i，j)

admin2019-06-11  58
问题 设有如下程序：
Option Base1
Dim a(3，4)As Integer，b(4，3)As Integer
Private Sub Command1_Click()’循环1
For i=1To3
For j=1To4
b(j，i)=a(i，j)
Next j
Next i’循环2
x=b(1，1)
For i=1To4
For j=1To3
Print b(i，j)；
If x＜b(i，j)Then x=b(i，j)
Next j
Print
Next i
End Sub
程序中的数组a已被赋值。以下关于上述程序的叙述中，正确的是
选项 A、窗体模块中，不能使用Dim声明a、b数组
B、“循环1”可以正常运行
C、“循环2”中循环变量i、j的终值不对，所以不能正常运行
D、程序可以正常运行，x中保存的是数组b中所有元素中最小的数
答案B
解析 在窗体模块中使用Dim声明模块接变量，也可以声明模块级数组：在循环1中i从1到3，j从1到4，无论是访问b(j，i)还是a(i，j)均在数组的范围内，可以正常运行；在循环2中b(i，j)的值也在数组范围内，循环可以正常运行；最后x里面保存的是数组中最大的数。
转载请注明原文地址:https://kaotiyun.com/show/5xUp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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