编写一个程序把一维数组的各元素反序存放。在主过程中调用subl过程把从键盘上输入的10个元素反序存放后再输出。根据题意,请完善下列程序。 Private Sub subl(b()As Integer, ByVal n As Integer) Dim i As Integer, j As Integer, t As Integer 【 】 j=n Do While i<j t=b(i):b(i)=b(j):b(j)=t i=i+1:j=j-1 Loop End Sub Private Sub Command1_Click() Dim a(1 To 10)As Integer, i As Integer Randomize For i=1 To 10 a(i)=Int(100*Rnd)+1 Next i For i=【 】 Print a(i); Next i Print Call【 】 For i=i To 10 Print a(i); Next i Print n End Sub