For 初期値 To 閾値 Step 増分
...(処理)
Continue For
...(処理)
Next
For 初期値 To 閾値 Step 増分
...(処理)
Continue For
...(処理)
Next
While 条件式
...(処理)
Continue While
...(処理)
End While
Do While 条件式
...(処理)
Continue Do
...(処理)
Loop
Private Sub Button7_Click(sender As System.Object, e As System.EventArgs) Handles Button7.Click
Dim i As Integer
For i = 0 To 10 Step 1
If i Mod 2 = 0 Then
Continue For
End If
TextBox1.Text += Convert.ToString(i) + " "
Next
End Sub