Continuing a loop in VB without Goto statement

[Guest_imported]

Hi,

Private Sub Command1_Click()
Dim i As Integer

Do While i < 10
If i = 5 Then
i = i + 1
(????????)
End If
print i
i = i + 1
loop
End Sub


In the above code I don't want to print value if i = 5. I should achieve this without a GOTO statement.

Any suggestions pls.

Thanks in advance

 

[dpaulson]

Private Sub Command1_Click()
Dim i As Integer

Do While i < 10
If i <> 5 Then
print i
end if
i = i + 1
loop
End Sub


David Paulson

 

[mikhailwaxman]

Do While i < 10
If i = 5 Then print i
i = i + 1
loop