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