[填空题] 在窗体上画一个名称为command 1的命令按钮,然后编写如下程序:Option Base 1Private Sub Colilinand1 Click()Dim a(10) As Int

13 查阅

[填空题] 在窗体上画一个名称为command 1的命令按钮,然后编写如下程序:

Option Base 1

Private Sub Colilinand1 Click()

Dim a(10) As Integer

For i = 1 To 10

a(i) = i

Next

call Swap(a)

For i = 1 To 10

Print a(i);

Next

End Sub

Sub Swap(b() As Integer)

n = 【6】

For i = 1 To n/2

t = b(i)

b(i) = b(n)

b(n) = t

【7】

Next

End Sub

上述程序的功能是,通过调用过程Swap,调换数组中数值的存放位置,即a(1)与a(10)的值互换,a(2)与a(9)的值互换,……,a(5)与a(6)的值互换。请填空。

参考答案:

10 n=n-1

Option Base语句,在模块级别中使用,用宋声明数组下标的起始值(缺省值为0)。子过程利用语句加以调用,使子过程成为一个独立的语句,其形式为:子过程名[参数列表]或 Call子过程名[参数列表]。题目要求将数组中的10个数逆序存放,也就是首尾两两交换,循环次数应为5次,在交换了a(1)与a(10),应将n的值减1,再将a(2)与a(9)进行交换,依此类推。

计算机考试