用vf语言编程： 用户输入8个数，按从大到小的顺序排列？

SET talk off
Clear
DIME a(8)
a=0
temp=0
FOR i=1 to 8
INPUT "请输入要比较的个数：" to a(i)
FOR j= 1 to i
IF a(i)>a(j)
temp=a(i)
a(i)=a(j)
a(j)=temp
ENDIF
ENDFOR
ENDFOR
FOR k=1 to 8
? a(K)
ENDFOR

Dim a(8) As Long, n As Integer ,j as integer,t as integer
For n = 1 To 8
a(n) getch()
Next
For n=1 To 8
For j=1 To n
if(a(n)<a(j))
{t=a(n)
a(n)=a(j)
a(j)=t}