GoSub...Return


GoSub...Returnステートメント

構文

GoSub line

line:

Return

lineには、分岐先の行ラベルまたは行番号を指定します。

VBAなどの構造化言語では、一般的にGotoやGoSubによる処理の分岐は推奨されていません。

ただし、On Error Gotoによるエラー処理へのジャンプは、ケースによっては効果的です。

解説

同一プロシージャ内で、サブルーチンへの分岐と復帰を指示します。

サンプル

次の例は、ユーザーが入力した値によってサブルーチンへ分岐し、Return行で復帰します。

Sub Sample()
    Dim a As Integer
    a = InputBox("数値を入力してください")
    If a < 10 Then GoSub Sub1
    MsgBox a
    Exit Sub
Sub1:
    a = a + 10
    Return
End Sub