中科新闻网御先祖賛江全集:vb代码问题
来源：百度文库 编辑：中科新闻网 时间：2024/05/08 03:01:13
For i = 1 To 9
For j = i + 1 To 10
If a(i) > a(j) Then
t = a(i): a(i) = a(j): a(j) = t '交换位置
End If
Next j
For j = i + 1 To 10的1 To 10怎么和i加呢 谢谢
For j = i + 1 To 10
If a(i) > a(j) Then
t = a(i): a(i) = a(j): a(j) = t '交换位置
End If
Next j
For j = i + 1 To 10的1 To 10怎么和i加呢 谢谢
程序第一次运行的时候,I的值是1,J=I+1,也就是2,下面是比较也就是a(1)>a(2)如果大于的就交换位置,就这样一直循环下去a(1)跟a(3)比较,一直到a(1)跟a(10)比较,这样就把最大的一个放在最后了.