VB

If ... Then
    ...
ElseIf ... Then
    ...
Else
    ...
End If


For {ID}=... To ... [Step ...]
    ... Exit For ...
Next {ID}

    Public Sub compute()
        Dim i As Long
        Dim total As Long

        total = 0

        For i = 1 To mMydata
            total = total + i
        Next i

        mResult = total
    End Sub

Do [{While | Until} ...]
    ... Exit Do ...
Loop

exit property

    Public Property Let mydata(value As Long)
        ... exit property ...
    End Property '외부에서 결과 값을 읽어갈 때 사용할 읽기전용속성