LOTUSSCRIPT LANGUAGE

Examples: Do statement
' Each loop below executes four times,
' exiting when the loop variable reaches 5.
Dim i As Integer, j As Integer
i% = 1
j% = 1
Do While i% < 5   ' Test i's value before executing loop.
  i% = i% + 1
  Print i% ;
Loop
' Output:
' 2  3  4  5
Do
  j% = j% + 1
  Print j% ;
Loop Until j% >= 5   ' Test j's value after executing loop.
' Output:
' 2  3  4  5

Véase también