[RESOLVED] Countdown Problem

[Rattled_Cage]

Private Sub Command1_Click()
Text1.Text = Text1.Text - 1
End Sub

Private Sub Form_Load()
Text1.Text = "99999999999999999"
End Sub

'''how do i stop it from counting down to 1E+17 and display numbers instead