关于VB的一道题，大家帮帮忙了

楼上用数组的方法很好还有可以用
dim a as int
dim b as int
dim c as int
dim max_1 as int
dim max_2 as int
max_1=iff(a>=b ? a:b)
max_2=iff(max_1>= c ? max_1:c)
或则
dim max as int
max =iff((a>=b ?a:b)>=c ?(a>=b ?a:b):c)

Function x(a as singel,b as single,c as single)
y=array(a,b,c)
for i=1 to 2
if y(i)>=y(i-1）then
temp=y(i-1)
y(i-1)=y(i)
y(i)=temp
end if
Print y(0),y(1),y(2)
End Function