定義子常式。
Sub Name[(VarName1 [As Type][, VarName2 [As Type][,...]]])
陳述式區塊
[Exit Sub]
End Sub
Name:子常式的名稱。
VarName:要傳送到子常式的參數。
Type:類型宣告關鍵字。
Sub ExampleShell
end sub