2. 计算机
  3. 编写如下事件过程： Option Base 1 Private Sub Form Click() Dim x1()As Integer Dim i As Integer Dim s A

编写如下事件过程： Option Base 1 Private Sub Form Click() Dim x1()As Integer Dim i As Integer Dim s A

admin2009-02-13  27
问题 编写如下事件过程：    Option  Base  1    Private  Sub  Form  Click()       Dim  x1()As  Integer       Dim  i  As  Integer       Dim  s  As  Integer       ReDim x1(3)       For  i = 1 To UBound(x1)          x1(i)=i + 1       Next  i       Call  sub1(x1)       For i = 1 To UBound(x1)          s = s + x1(i)       Next  i       Print s    End  Sub    Private  Sub  sub1(n()As Integer)       Dim  i  As  Integer       ReDim  Preserve  n(5)       For i = 3 To 5          n(i)=n(i-1)*2       Next  i    End  Sub    程序运行后，单击窗体，则窗体上显示的内容是
选项 A、6
B、12
C、24
D、47
答案8
解析 在主过程中，数组x1的下标最大值为3，赋初值分别为2、3、4，通过实参和形参的调用，数组x1的值传给了数组n。在子过程中，数组n的下标最大值被重新定义为5，下标3～5的值计算的结果分别为6、12、24。在主过程中，将数组x1的各值相加得：2+3+6+12+24=47。
转载请注明原文地址:https://kaotiyun.com/show/io1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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