 |
|
Die Schleife benötigt keine Laufvariable. Die Schleife wird solange durchlaufen, bis sie mit Exit Do verlassen wird.
Die Schleife kann mit dem Befehl Continue unmittelbar fortgesetzt werden.
Dim i As Long, k As Long
i := 0
Do
k := k + 100
If k > 1000 Then
Exit Do
End If
i := i + 1
End Do
Achtung: Wird keine Abbruchbedingung vorgegeben, kann diese Schleife zum Hängen der Anwendung führen.
Contents
Index
Previous
Next