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

サイト管理人

9年前

GoSub…Return ステートメント

GoSub ステートメントは、指定したラベルのサブルーチンへプログラムの制御を移します。Return ステートメントは、制御を元に戻し、GoSub ステートメントの次の行から実行します。

【構文】

GoSub subroutine
　　statements

subroutine:
　　statements
　　Return

引数・戻り値

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

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

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

GoSub…Return ステートメント使用例

サンプルVBAソース

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

MyRoutine:
    num = 100 / num
Return
    
End Sub

Sub Sample_GoSub()

Dim num

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

If num > 0 Then

GoSub MyRoutine

End If

MsgBox num

Exit Sub

MyRoutine:

num = 100 / num

Return

End Sub

GoSub…Return ステートメント

GoSub…Return ステートメント 使用例

サンプルVBAソース

実行結果

GoSub…Return ステートメント使用例