CODEWITHSUNDEEP
vba
0xfff1
0xfff1

Reputation: 11

How to show decimal's in code

Dim Cost, Number1, Number2, Number3, Number4, Answer, Answer1, NumberMeals As Decimal
    If rbSingle.Checked Then Number1 = 200.0 
    If rbDouble.Checked Then Number2 = 210
    If rbSuite.Checked Then Number3 = 220
    If rbLuxary.Checked Then Number4 = 50
    If CheckBox1.Checked Then NumberMeals = 10

    Cost = Number1 + Number2 + Number3 + Number4 + NumberMeals
    Answer = Cost * txtDays.Text

    Label5.Text = Answer
    Label5.Visible = True

How do I make it show decimals in the label eg $200.00

Upvotes: 0

Views: 33

Answers (1)

0xfff1
0xfff1

Reputation: 11

Never mind found out how.

Label5.Text = Format(Answer, "C")

Upvotes: 1

Related Questions