[填空题] 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option base 1 Private Sub Command1_Click() Dim a(10) As Integer For i = 1 To 10 a(i) = i Next Call swap( 【13】 ) For i = 1 To 10 Print a(i); Next End Sub Sub swap(b() As Integer) n = 【14】 For i = 1 To n / 2 t = b(i) b(i) = b(n) b(n) = t 【15】 Next End Sub 上述程序的功能是,通过调用过程swap,调换数组中数值的存放位置,即a(1)与a(10)的值互换,a(2)与a(9)的值互换,……,a(5)与a(6)的值互换。请填空。
正确答案:a( )ubound(b) n=n-1
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)