プロシージャ内のサブルーチンへ移動（GoTo ステートメント）

サイト管理人

9年前

GoTo ステートメント

GoTo ステートメントは、指定したラベルのサブルーチンへプログラムの制御を移します。

【構文】

GoTo subroutine
　　statements

subroutine:
　　statements

引数・戻り値

subroutine ・・・サブルーチン名を指定します。

statements ・・・実行するステートメントを記述します。

GoSub ステートメントと GoTo ステートメントの違いについて
GoSub ステートメントの場合、指定されたラベルへジャンプした後、もとの処理に戻るのに対して、GoTo ステートメントの場合は、行きっぱなしになります。
（ ※ GoSub…Return ステートメントの詳細に関しては、プロシージャ内のサブルーチンへ移動（GoSub…Return ステートメント）を参照してください。）

GoTo ステートメント使用例

サンプルVBAソース

　
Sub Sample_GoTo()

    Dim num
    num = InputBox("数値を入力してください")
    
    If num > 0 Then
        GoTo MyRoutine
    End If
    MsgBox num
    Exit Sub

MyRoutine:
    num = 100 / num
    MsgBox num

End Sub

Sub Sample_GoTo()

Dim num

num = InputBox("数値を入力してください")

If num > 0 Then

GoTo MyRoutine

End If

MsgBox num

Exit Sub

MyRoutine:

num = 100 / num

MsgBox num

End Sub

GoTo ステートメント

GoTo ステートメント 使用例

サンプルVBAソース

実行結果

GoTo ステートメント使用例