[填空题] 下列程序的功能是:单击窗体时将随机生成10个0~99之间的随机数,并赋值给数组A,然后利用选择法排序;并把排序后的结果输出。 Private Sub Form_Click() Dim A
16 查阅
[填空题] 下列程序的功能是:单击窗体时将随机生成10个0~99之间的随机数,并赋值给数组A,然后利用选择法排序;并把排序后的结果输出。 Private Sub Form_Click() Dim A(9) As Integer,i As Integer Dim j As Integer,k As Integer Randomize For i=0 To 9 A(i)=Int(100*Rnd) Next i For i=0 To 8k= 【9】 For j=i To 9 If(A(k)>A(j))Then 【10】 End IfNext jIf k<>i Then t=A(k):A(k)=A(i):A(i)=tEnd If Next i For i=0 To 9Print A(i), Next i Print End Sub
参考答案: