SUB name ( [arg [= expr] {, arg [= expr]} ] [, ...] )
[ DIM variable {, variable } ]
[ STATIC variable {, variable } ]
[ SHARED variable {, variable } ]
[ RETURN ]
[ EXIT SUB ]
{ statement }
END SUB