Sub Statement
рдЙрдкрдХрд╛рд░реНрдпрддрд╛рд▓рд┐рдХрд╛рд╣рд░реВ рдкрд░рд┐рднрд╖рд┐рдд рдЧрд░реНрджрдЫ ред
рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛
Sub Name[(VarName1 [As Type][, VarName2 [As Type][,...]])]
рдХрдерди рдЦрдгреНрдб
End Sub
рдкрд░рд╛рдорд┐рддрд┐рд╣рд░реВ:
Name: Name of the subroutine.
VarName: Parameter that you want to pass to the subroutine.
рдкреНрд░рдХрд╛рд░:рдкреНрд░рдХрд╛рд░-рдШреЛрд╖рд┐рдд рдХреБрдЮреНрдЬреА рд╢рдмреНрдж ред
рдЙрджрд╛рд╣рд░рдг:
Sub Example
' рдХрд╛ рдХреЗрд╣реА рдХрдердирд╣рд░реВ
End Sub