VB编程 把三个数按从大到小顺序排列，求代码？

dim a,b,c,x as integer
if a<b then begin
x=a
a=b
b=x
end
if a<c then begin
x=a
a=c
c=x
end
if b<c then begin
x=b
b=c
c=x
end
print a;b;c
好久没用BASIC了，错了你自己改改吧，SORRY本回答被提问者采纳