Om man jag vill skriva över redan befintlig text i en textbox
utan att först ta bort den. Hur gör jag då ?

När man skriver något så ska det byta ut tecknet som redan finns där

Ska det bara vara ett tecken i textboxen? I sådana fall:

<code>
Private Sub Text1_KeyPress(KeyAscii As Integer)
Text1 = ""
End Sub
</code>

/Johan

Nej det kan vara hela ord också

Hur menar du då? Ska hela ordet markeras när rutan aktiveras?

<code>
Private Sub Text1_GotFocus()
Text1.SelStart = 0
Text1.SelLength = Len(Text1)
End Sub
</code>

/Johan

Nej, markören står ju i vänsterkant och blinkar
När man sedan skriver något
Så ska det skriva över den text som står där
Om det står "Hej" där och jag skriver ett "a" så ska det bli "aej"
Nästa blir ju kanske ett "t" och då ska det "atj" och så vidare

Såhär då...

<code>
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii <> 8 Then
Text1.SelLength = 1
Text1.SelText = ""
End If
End Sub
</code>

/Johan

Jag tacka och bugar, funkar perfekt...