急求一个VB的问题!高手请进。

来源:百度知道 编辑:UC知道 时间:2024/05/21 19:31:49
dim x(1 to 6) as integer
dim s as integer,e as integer
dim t as integer
s=Lbound(x)
e=Ubound(x)
for i=s to e
for j=i to e-1
If x(i) < x(j + 1) Then
t = x(i)
x(i) = x(j + 1)
x(j + 1) = t
End If
Next j
Next i
for each c in x
print "x("i")=";x(i)
next c
问题就在for i=s to e
for j=i to e-1
If x(i) < x(j + 1) 到底怎么解释啊?两个数比较嘛,j=i to e-1 代表什么啊?哪个数啊? j+1呢? 我思索了很久不好理解,请高手赐教。本人感激不尽!

冒泡算法,排序。
比如有五个数,x(1 to 5);
从1到4是说排列第几大的数据
i是1时 即排列出最大的数
j说的是i-1个数已排完,送进x(1 to i-1)里,把x(i)与x(i+1 to n)比一遍,求出最大的。

相邻两个数比较,如果后面的比前面的大,两个数就交换位置,先把前边的书存到t,后边的数到前边,后边的数在变成t,就是原来在前的那个书的值,就这样咯。

说到底就是一个倒排序,数组里面的数据从大到