Your programs codę:
SubcmdCalc Click()
Cali CostOf Sales^^^
End Sub_
Sub optSaleReport Click( ; Cali CostOfSales < —
Sub chkOtrEnd LostFocus( ]
Cali CostOfSales < —
End Sub
Sub CostOfSales