[RISOLTO] Cancellazione caratteri a destra del cursore

[tornu]

Buonasera a tutti,
scusate per l'oggetto non proprio comprensibile, ma non sapevo come titolare questo nuovo post.
In un mio vecchio post http://www.gambas-it.org/smf/index.php?topic=761.msg8158#msg8158
avevo chiesto aiuto per allineare i dati in un certo modo contenuti in una TextBox che con la soluzione
(che per capire potete scaricare) suggeritomi in quella discussione dall'utente dex avevo risolto, ora mi serve
che solo i dati a sinistra del cursore vengano allineati a destra alla pressione del tasto Enter. Per esempio se la
TextBox contiene la parola Paperone posizionado il cursore tra la o e la n premendo Enter
Papero si deve allineare a destra e ne deve essere cancellato. Mi serve qualche suggerimento per
cercare di capire come potrei fare, se fattibile.

[Gianluigi]

Una cosa così potrebbe andare?

Codice: [Seleziona]

Public Sub TextBox1_KeyPress()
  Dim s As String
  s = TextBox1.Text
  Select Key.code
      Case Key.Enter, Key.Return
        TextBox1.Text = Left$(s, TextBox1.Pos)
        TextBox1.Alignment = 2
   End Select

End

[tornu]

Ciao Gianluigi,
era proprio la soluzione che cercavo. Grazie tante...