2. 计算机
  3. 下面程序是用冒泡法将数组a中的10个整数按升序排列，请将程序补充完整。 Private Sub Command1_Click( ) Dim a, Tmp As Integer a = Array (678,45,3

下面程序是用冒泡法将数组a中的10个整数按升序排列，请将程序补充完整。 Private Sub Command1_Click( ) Dim a, Tmp As Integer a = Array (678,45,3

admin2009-03-15  27
问题 下面程序是用冒泡法将数组a中的10个整数按升序排列，请将程序补充完整。
     Private Sub Command1_Click( )
     Dim a, Tmp As Integer
           a = Array (678,45,324,528,439,387,87,875,273,823)
           For i =【  】
                Forj =0 To 9
                     Ifa (i)＜a(j) Then
                          Tmp = a(i): a(i) = a(j) i a(j) = Tmp
                     End If
          Next j,i
          For i = 0 To 9
             Print a(i)
           Next
     End Sub
选项
答案0 To 9
解析 使用Array函数给数组赋值时，默认数组的下标从0开始，依次比较各数大小，则i=0 To 9。
转载请注明原文地址:https://jikaoti.com/ti/Mfq0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)