If you would like to return some values, you need to use function, like this:
Sub Test()
Msgbox "1*2=" & Twice(1), vbInformation, "Information..."
Msgbox "5*2=" & Twice(5), vbInformation, "Information..."
Msgbox "13*2=" & Twice(13), vbInformation, "Information..."
End Sub
Function Twice(myVal as Integer) As Integer
Twice = myVal * 2
End Function
...but if you would like to return into some instruction inside code block, you need to write some subprogram, like this:
Sub BlaBlaBla()
AnotherOneCheck:
If some_condition = some_value Then
GoTo AnotherOneCheck
End If
End Sub