'Calculating Tax And Displaying It
    Me.lblTotal.Caption = Format(sngTotal, "currency")
    sngTax = sngTotal * 0.11
    Me.lblTax.Caption = Format(sngTax, "currency")
    sngFinalTotal = sngTax + sngTotal
    Me.lblFinalTotal.Caption = Format(sngFinalTotal, "currency")
    isgay