2012年软考软件设计师最新预测试题(三)
Then Print Next IEnd Sub
Private Sub cmdsort_Click()
Dim I As Integer
Dim j As Integer
For I=1 To k-1
For j= I to k
If (4) Then temp=b(i):b(i)=b(j):b(j)=temp
Next j
(5)
For I=1 To k
Print b(i)
If Int(i/5)=i/5 Then Print
Next I
End Sub
页:
[1]