UC知道VB中从小到大的问题?
来源：百度知道 编辑：UC知道 时间：2024/06/22 23:52:40
手中有十个数字,从小到大排列.
假设a(10)数组里有10个不规则的数
for i=0 to 8
for j=i+1 to 9
if a(i)>a(j) then
k=a(i):a(i)=a(j):a(j)=k
end if
next
next
标准起泡排序算法....代码自己找去. 快速交换法也可以.
将十个数的值赋给一个数组！然后比较每相邻两个数的大小，小的在左，大的在右，如果不对，则交换位置！循环比九次就OK了！该法叫做冒泡法排序！
直接放到一个LISTBOX,把LISTBOX的STORTED属性设为TRUE就行了,然后再读取出来就行了.