程序运行后,利用冒泡法对数组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
主观题
程序运行后,利用冒泡法对数组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