Button Problem

[A|ex]

Ive made a button to + 0.5 to a text field the vba code is simple

Private Sub btnDiscountUp_Click()

Dim DiscountValue As Double
Dim Temp As Double
DV = DiscountValue
Temp = DV + 0.5
tboDiscount = Temp
End Sub

However it ONLY works once, if i click it again it doesnt add another 0.5 on. What am i doing wrong?

 

[A|ex]

nvm it was suppose to be tboDiscount = tboDiscount + 0.5

its fixed now