office 2003完整版 sp3:水能用QB编个程序这个程序的目的是先比较三个数的大小然后在重大到小排列出来。

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/10 23:25:00

比较三个数的大小是什么意思啊?
请具体说明,比如输入什么,输出什么。

排列大小的程序,从大到小:
Dim a(2),t
a(0)=1
a(1)=20
a(2)=3

For i=0 To 1
For j=i+1 To 2
If a(i)<a(j) Then
t=a(i)
a(i)=a(j)
a(j)=t
End If
Next j
Next i