2. 计算机
  3. 下面程序段的运行结果是【 】。 Option Base 1 Private Sub swap (a() As Integer) For I=1 to 10/2 t=a (I) a (I) =a (10-I+l) a (10-I+1)=t Next I

下面程序段的运行结果是【 】。 Option Base 1 Private Sub swap (a() As Integer) For I=1 to 10/2 t=a (I) a (I) =a (10-I+l) a (10-I+1)=t Next I

admin2009-05-20  47
问题 下面程序段的运行结果是【  】。
Option Base 1
Private Sub swap  (a()  As Integer)
For I=1 to 10/2
t=a (I)
a (I) =a (10-I+l)
a (10-I+1)=t
Next I
End Sub
Private Sub Form Click()
Dim x(10) As Integer
For I=1 to 10
x(I) =1*2
Next I
Swap x ()
For I=1 to 10
Print x (I)
Next I
End Sub
选项
答案2018.16141210 8642
解析 本题考查考生数组虚实结合的问题，在该事件过程中，定义并生成了x数组，该数组共10个元素，分别是 246 8101214161820，接着使用了不带Call的调用语句，实际参数和虚拟参数都是数组，是地址传送，在过程中访问的数组就是事件过程中的x数组。在该过程中，将数组的第一个元素和最后一个元素交换位置，依此类推，返回事件过程后输出交换后的数组全部元素。
转载请注明原文地址:https://www.kaotiyun.com/show/Cq5p777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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