Option ExplicitPrivate slsTax As Single ' module-level variable declared with Private statementSub CalcCost() '...Instructions of the procedure...End Sub