2. 计算机
  3. 设有如下程序： Option Base 1 Dim a(3，4)As Integer，b(4，3)As Integer Private Sub Commandl_Click() ’循环1 For i=1 To 3 Forj=l To 4 b(j，

设有如下程序： Option Base 1 Dim a(3，4)As Integer，b(4，3)As Integer Private Sub Commandl_Click() ’循环1 For i=1 To 3 Forj=l To 4 b(j，

admin2017-06-21  71
问题 设有如下程序：
Option Base 1
Dim a(3，4)As Integer，b(4，3)As Integer
Private Sub Commandl_Click() ’循环1
For i=1 To 3
Forj=l To 4
   b(j，i)=a(i，j)
  Next j
Next i ’循环2
  x=b(1，1)
For i=1 To 4
Forj=1 To 3
   Print b(i，j)；
  Ifx＜b(i，j)Then x=b(i，j)
Nextj
  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/EDGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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