单选题
下面的程序运行时,单击窗体后,窗体上显示的结果是______。
Private Sub
Form_Click()
Dim a(1 To 6) As Integer
Dim
min1%,i%,j%,n%,t%,k%
a(1)=8:a(2)=6:a(3)=9
a(4)=3:a(5)=2:a(6)=7
n=6
For i=1 To
n-1
min1=i
For j=i+1 To n
If
a(j)<a(min1)Then min1=j
Next j
t=a(i):a(i)=a(min1):a(min1)=t
Next i
For i=1
To n
Print a(i)
Next i
End
Sub
- A.9 8 7 6 3 2
- B.2 3 6 7 8 9
- C.9 8 7 6 3
- D.2 3 6 7 8