![[填空题] 程序运行后，利用冒泡法对数组a中的数据按从小到大排序。请在空白处填入适当的内容将程序补充完整。 Private Sub Form_load() Dim at(To 5)As Integ](http://www.mshxw.com/aiimages/31/249591.png "[填空题] 程序运行后，利用冒泡法对数组a中的数据按从小到大排序。请在空白处填入适当的内容将程序补充完整。 Private Sub Form_load() Dim at(To 5)As Integ")
[填空题] 程序运行后，利用冒泡法对数组a中的数据按从小到大排序。请在空白处填入适当的内容将程序补充完整。
Private Sub Form_load()
Dim at(To 5)As Integer
n=5
a(1)=20:a(2)=25=a(3)=10:a(4)=40:a(5)=15
(8)
For Z=1 To n-m
If a(z)＞a(z+1) Then
t=a(z)
a(z)=a(z+1)
a(Z+1)=t
End If
Next Z
Next m
End Sub
参考答案：
for m=1 to n-1问题解析:
冒泡排序是需要记忆的典型程序。此题需要注意待填空的下一行有z+1，也就是说待填空循环上限只能是n-1。
