Calculate Vendor price to Sale Price

My issue is calculating vendor cost to sale price. I have a series of text boxes that pull data from my spread sheet which works fine. I have an update command button to change pricing and a calculate command button to update my sale price. What I get is something that looks the for my cost, price, and sale price 7212116.4 instead of the correct dollar amount. Below is the code I'm currently using and including the workbook as well

Private Sub cmdCalculate_Click()

    Me.txtCost.Value = (Me.txtListPrice.Value - Me.txtListPrice.Value * Me.txtDiscount.Value)
    Me.txtPrice.Value = (Me.txtCost.Value * (1 + Me.txtMarkup.Value))
    Me.txtLaborPrice.Value = (Me.txtLaborRate.Value * Me.txtLaborHours.Value)
    Me.txtSalePrice.Value = (Me.txtLaborPrice.Value + Me.txtShipping.Value + Me.txtPrice.Value)
    
End Sub

.

I would appreciate any help