dim a(3)'定义数组a，a(1)存放最大值，a(3)最小值
a(1)=x
if y>a(1) then
a(2)=a(1)
a(1)=y
else
a(2)=y
endif
if z>a(1) then
a(3)=a(1)
a(1)=z
else if z>a(2) then
a(3)=a(2)
a(2)=z
else
a(3)=z
endif
x=a(1)
y=a(2)
z=a(3)
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024