Timer1_Tick
Dim price,pounds,results As Float
price = PriceLabel.Text
If PriceButtonDown Then
If PriceButtonPressed ="Increase" Then
price = price + .05
Else
If price>0 Then
price = price - .05
End If
End If
PriceLabel.Text = NumberFormat(price,0,2)
End If