VB数组用循环怎么比较啊

来源：百度知道 编辑：UC知道 时间：2024/05/17 08:01:21
并且比较的是二维Dim i, j As Integer
i = 0
j = 0
For i = 0 To 2
For j = 0 To 2
al(i,j)<=av(i)
Next j
Next i数组

输入10个数字，把他们从小到大显示出来

Private Sub Form_Click()
a = Split(InputBox("输入10个数字，并以空格分开"), , 10)
Print "你输入的10个数字为："
For i = 0 To 9
Print a(i) & " ";
Next
For i = 9 To 1 Step -1
For j = 0 To i - 1
If a(j) > a(j + 1) Then
t = a(j)
a(j) = a(j + 1)
a(j + 1) = t
End If
Next j
Next i
Print
Print "从小到大排序后的结果是："

For j = 0 To 9
Print a(j) & " ";
Next
End Sub