UC知道我个笨鸟VB数组排序不理解
来源：百度知道 编辑：UC知道 时间：2024/06/01 17:27:47
A(1)=3 A(2)= 2 A(3)= 7 A(49)= A(5)=5
Dim i As Long, l As Long,n As Long
For i=1To4
For l=nTo5
if A(i)<A(l) Then
n=A(i) 将A(i)的值赋予变量n
A(i)=A(l) 将A(l)的值赋予变量A(i)
A(l)=n 将n的值赋予变量A(l)
End if
Next l
Next i
---------------------------------------------------------------
表面上的东西还可以理解。。。
但是内在执行的过程 我不懂
那个哥哥可以用普通的方法解释啊。！虽然穷 但是分全给了。。。只有9分
Dim i As Long, l As Long,n As Long
For i=1To4
For l=nTo5
if A(i)<A(l) Then
n=A(i) 将A(i)的值赋予变量n
A(i)=A(l) 将A(l)的值赋予变量A(i)
A(l)=n 将n的值赋予变量A(l)
End if
Next l
Next i
---------------------------------------------------------------
表面上的东西还可以理解。。。
但是内在执行的过程 我不懂
那个哥哥可以用普通的方法解释啊。！虽然穷 但是分全给了。。。只有9分
你这个程序是排序 是从大到小的
主要核心是：
if A(i)<A(l) Then
n=A(i) 将A(i)的值赋予变量n
A(i)=A(l) 将A(l)的值赋予变量A(i)
A(l)=n 将n的值赋予变量A(l)
End if
Next l
Next i
比如A(2)<A(3)
if 判断条件成立
n=A(i) 将A(i)的值赋予变量n
A(i)=A(l) 将A(l)的值赋予变量A(i)
A(l)=n
这段代码就是把A（2）跟A（3）的值掉下 先前A(2)=2，A(3)=7 。换值后就是
A(2)=7，A(3)=2，然后在那A（2）跟 A(4)比 看条件是不是成立 如果成立就调换值，不成立就跟下A（5）相比较。以此类推……
例如 1 4 5 6四个数
第一步,将第一个数 1 与后面的 4 5 6 比较,将最大数与1交换,得 6 4 5 1
第一步,将第二个数 4 与后面的 5 6 比较,将最大数与4交换,得 6 5 4 1
如此到最后一个数,降序排列