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

admin2018-10-18  26

问题 设有如下程序:
Option Base1
Dim a(3,4)As Integer,b(4,3)As Integer
Private Sub Command1_Click()’循环1
For i=1 To 3
For j=1 To 4
b(j,i)=a(i,j)
Next j
Next i’循环2
x=b(1,1)
For i=1 To 4
For j=1 To 3
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,i)均在数组的范围内,可以正常运行:在循环2中b(i,i)的值也在数组范围内,循环可以正常运行;最后x里面保存的是数组中最大的数。
转载请注明原文地址:https://jikaoti.com/ti/lKm0FFFM
0

最新回复(0)