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

admin2017-11-23  32

问题 设有如下程序:
    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=1 To 4
              b(j,i)=a(i,J)
           Nextj
    Next i  ’循环2
    x=b(1,1)
    For i=1 To 4
           Forj=1 To 3
               Print b(i,j);
               IfX       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,i从1到4,无论是访问b(j,i)还是a(i,j)均在数组的范围内,可以正常运行;在循环2中b(i,j)的值也在数组范围内,循环可以正常运行;最后x里面保存的是数组中最大的数。
转载请注明原文地址:https://jikaoti.com/ti/MEy0FFFM
0

最新回复(0)