比较for---next与do---loop的具体区别
湫龙 2010-04-24 09:54:09 请高手指教如何清晰认清比较for---next与do---loop的具体区别? 以及适用的范围??
若一段代码是:如何用for---next代替do---loop来实现?????
Private Sub Form_Load()
Dim p As Integer
Randomize
p = ""
For i = 1 To 10
Do
x = Int(Rnd * 91 + 10)
yes = 0
For j = 1 To i - 1
If x = a(i) Then
yes = 1
Exit For
End If
Loop While yes = 1
Next i
End Sub