百科知识

电脑/网络

vb题从键盘中输入10个整数,并放入一个一维数组中,然后将其前5

2007-05-13 13:51:28s***
从键盘中输入10个整数,并放入一个一维数组中,然后将其前5个元素与后5个元素对换,即第一个元素与第十个元素互换,第二个元素和第九个元素对换......第五个与第六个互换.分别输出数组原来各元素的值和对换后个元素的值. 那为高手可以帮帮我?谢谢!!!!vb题从键盘中输入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
    2007-05-13 15:04:26
    • 很赞哦！ (11)

    相关文章