📅  最后修改于: 2022-03-11 14:51:56.082000             🧑  作者: Mango
Dim y As Integer = 1
'Do the action while the condition is not true
'add 1 to y while y is not equal to 10
Do While Not y = 10
MsgBox("Y value = " & y)
y += 1
Loop