在窗体上画一个名称为Command1的命令按钮。然后编写如下程序:Option Base 1Private Sub Command1_click() Dim a(10)As Integer For i=1 To 10 a(i)=1 Next call swap([11] ) For i=1 To 10 Print a(i); NextEnd subSub swap(b() As Integer)
主观题
在窗体上画一个名称为Command1的命令按钮。然后编写如下程序:Option Base 1Private Sub Command1_click() Dim a(10)As Integer For i=1 To 10 a(i)=1 Next call swap([11] ) For i=1 To 10 Print a(i); NextEnd subSub swap(b() As Integer)