Backspace problem

[RSTR]

I have this code written:


private_sub cmdback()

text1.text = info + chr(0)

end sub


This deletes one character, but when the button is clicked
again, it deletes nothing.

what am I supposed to do that will make a backspace work all of the time?

-RSTR


rstr@spacemail.com

 

[dpaulson]

Private Sub cmdBack_Click()
If Len(info) > 0 Then
info = Left$(info, Len(info) - 1)
Text1 = info
End If
End Sub

David Paulson