VB语言编程

输入100个数（整型和浮点型），将其中的整数进行排序并按每行5个数的格式打印出来

帮忙看 下 谢谢

dim a(1 to 100) as integer

for(i=1 to 100)

a(i)=inputbox("请输入")

next

for i=1 to 99

for j=i+1 to 100

if a(i)<a(j) then

t=a(i):a(i)=a(j):a(j)=t

end if

next

for i=1 to 100

print a(i)+" "

if i mod 5=0 then print

next