分类：电脑/网络-软件
问题：vb题从键盘中输入10个整数,并放入一个一维数组中,然后将其前5 
从中输入10个整数,并放入一个一维数组中,然后将其前5个元素与后5个元素对换,即第一个元素与第十个元素互换,第二个元素和第九个元素对换......第五个与第六个互换.分别输出数组原来各元素的值和对换后个元素的值.那为高手可以帮帮我?谢谢!!!!
回答：Private Sub Form_Load()
Me.AutoRedraw = True
End Sub

Private Sub Command1_Click()
Dim i As Integer, arry(9) As Integer, temp As Integer
For i = 0 To 9
    arry(i) = InputBox ("请输入第" & i + 1 & "个元素")
    Print arry(i)
Next
For i = 0 To 9
    If i <= 4 Then
        temp = arry(i)
        arry(i) = arry(9 - i)
        arry(9 - i) = temp
    End If
    Print arry(i)
Next
End Sub