vb编程:从键盘上输入10个整数,并放入一个一维数组中,然后将其前5个元素与后5个元素对换,即:第1个元素与第10个元素互换,第2个元素与第9个元素互换……第10个元素与第1个元素互换。分别输出数组原来各元素的值和对换后各元素的值。


以下是此题的【VB源代码】
Private Sub Form_Click()
 
    arr = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
    Print "原来数组:"
    For i = 0 To 9
        Print arr(i);
    Next i
    Print
    For i = 0 To 4
        For j = 5 To 9
            t = arr(i)
            arr(i) = arr(j)
            arr(j) = t
        Next j
    Next i
    Print "对换后数组:"
    For i = 0 To 9
        Print arr(i);
    Next i
   
 End Sub

运行此VB源码后,点击窗体,结果情况如下图所示:

 
新世纪计算机基础教育丛书 丛书主编:谭浩强
Visual Basic 程序设计教程 题解与上机指导(第四版) 刘炳文 编著

来源:visual basic程序设计教程第四版答案(刘炳文)

本文链接:http://www.wb98.com/vb1/post/vb_8.4.html

本站文章搜索:

<< 上一篇下一篇 >>

搜索

Tags列表

扫我手机登录

赞助商链接