[填空题] 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim a(10) As I
12 查阅
[填空题] 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Option Base 1
Private Sub Command1_Click()
Dim a(10) As Integer
For i=1 To 10
a(i)=i
Next
Call swap(______)
For i=1 To 10
Print a(i)
Next
End Sub
Sub swap(b() As Integer)
n=Ubound(b)
For i=1 To n/2
t=b(i):b(i)=b(n):b(n)=t
______
Next
End Sub
上述程序的功能是:通过调用过程swap,调换数组中数值的存放位置,即a(1)与a(10)的值互换,a(2)与a(9)的值互换,……。请填空。
参考答案: