[Vb6] Eliminare ultima lettera inserita nel TextBox

[MItaly]

Epperò ditele le cose...

Dim str As String
str = NomeTextBox.Text
NomeTextBox.Text = str.Substring(0,str.Length-1)