faire jusqu'à VB.net
Dim z As Integer = 0
'Do the action until the condition is true
'add 1 to z until z equals 20
Do Until z = 20
MsgBox(z)
z += 1
Loop
Helpful Hawk
Dim z As Integer = 0
'Do the action until the condition is true
'add 1 to z until z equals 20
Do Until z = 20
MsgBox(z)
z += 1
Loop