Turn on/off the Insert in a textbox?

[Thomas Halsvik]

Anyone know how to turn on or off the insertkey in a textbox, so when i write in the textbox i overwrite stuff there. This can be done manually by pressing the Insert key on the keyboard, but I want it to be that way in the textbox.

[HeSaidJoe]

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

[kedaman]

Text1.SetFocus
SendKeys "{INSERT}"

[jbart]

HeSaidJoe's code is exactly correct, but I put the same code (minus the setfocus line) in the GotFocus event. That way whenever the field is entered, the text is selected and can be keyed over immediately.

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

[Jop]

I'm sorry but I don't agree.
Kedeman's code works better (in this case) because only the characters typed are being overwritten, not all text, it's like virtually pressing the <Insert> key.

[kedaman]

That's how i interpreted the qwestion