下面的程序用“冒泡”法将数组a中的10个整数按升序排列，请将程序补充完整。
Option Base 1
Private Sub Command1_Click（　）
Dim a
a=Array(678，45，324，528，439，387，87，875，273，823)
For i= 【8】
For j= 【9】
If a(i) 【10】 a(j)Then
a1=a(i)
a(i)=a(j)
a(j)=a1
End If
Next j
Next i
For i=1 To 10
Print a(i)
Next i
End Sub

题库:计算机等级考试 类型:填空题 时间:2017-07-03 15:33:30 免费下载:《填空》Word试卷

下面的程序用“冒泡”法将数组a中的10个整数按升序排列，请将程序补充完整。
Option Base 1
Private Sub Command1_Click（　）
Dim a
a=Array(678，45，324，528，439，387，87，875，273，823)
For i= 【8】
For j= 【9】
If a(i) 【10】 a(j)Then
a1=a(i)
a(i)=a(j)
a(j)=a1
End If
Next j
Next i
For i=1 To 10
Print a(i)
Next i
End Sub

本题关键词:面试程序,程序,复苏程序,工作程序,建设程序,程序变更,程序冲突,点火程序,生产程序,编制程序;