当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer For i=1 To 10a(i)=i Next Call swap(______) For i=1 To 10Print a(i); Next End Sub Sub swap(b()As Integer) n=Ubound(b) For i=1 To n/2t

  

参考答案:

a()或an=n-1

  参考解析

本题中程序的功能是通过调用过程Swap,实现数组中数值的存放位置,即数据组中第一个数与最后一个数互换。

微信端