Un'altra domanda, ho creato un tasto cancel che dovrebbe eliminare l'ultimo carattere inserito nella textbox del form della tastiera, hai qualche consiglio anche per quello?
Ho provato a fare in questo modo:
Public Sub Button_Click()
textbox1.Select(textbox1.pos - 1, 1)
End
Così facendo seleziono l'ultimo l'elemento o quello a sinistra del puntatore, adesso, una volta selezionato dovrei eliminarlo, consigli?
Lui evidenzia l'ultima a destra, quindi credo voglia fare qualcosa di simile:
Dim s As String
s = TextBox1.Text
If Not IsNull(s) Then
s = Left(s, Len(s) - 1)
TextBox1.text = s
Endif
Sono però d'accordo con te nel ritenere Gilby un po avaro di informazioni ;D
:ciao:
Ecco allora una simpatica soluzione esaustiva (puoi far terminare la stringa con un carattere accentato (à,ò,è,é,ù): :)
Public Sub Button1_Click()
TextBox1.Select(TextBox1.Pos - 1, 1)
Wait 0.5
If Not IsAscii(Right(TextBox1.Text, 1)) Then
TextBox1.Text = Left(TextBox1.Text, Len(TextBox1.Text) - 2)
Else
TextBox1.Text = Left(TextBox1.Text, Len(TextBox1.Text) - 1)
Endif
End
Dim s As String
s = TextBox1.Text
If Not IsNull(s) Then
s = Left(s, String.Len(s) - 1)
TextBox1.text = s
Endif
:ciao: