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

admin2019-03-08  38

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

最新回复(0)