[VB6]Setfocus

[cesco]

ciao a tutti,

Private Sub Text1_Change()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
Text1.SetFocus
End Sub

solo che così mi scrive solo un carattere logicamente perchè seleziono il primo carattere..
io dovrei togliere la selezione e rimetterla in modo che io possa continuare a scrivere nel text
sapete dirmi come??
grazie

[alka]

Non capisco cosa cerchi di ottenere con quel codice... all'interno di un TextBox, si scrive già di seguito normalmente. :master:

[cesco]

risolto
dovevo andare su

Private Sub Text1_KeyPress(KeyAscii As Integer)
Text1.SelStart = Len(Text1.Text)
End Sub
Private Sub Text1_Change()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
Text1.SetFocus
End Sub

in questo modo ....mi scrive la frase sul text e me la seleziona
grazie