Aut. markering af indholdet i txtbox

Private Sub Form_Load()
Text1.SelLength = Len(Text1.Text)
End Sub

Når du starter, skal du sørge for at din tekstbox har focus (tabindex=0):

    txtbox.SelStart = 0         
    txtbox.SelLength = Len(txtbox)

Man kan også få focus ved, at bruge kommandoen SetFocus.

Husk at man IKKE kan sætte fokus i Form_Load.

Dette er hvad jeg har skrevet:

    TextBox1.SetFocus
    TextBox1.SelLength = Len(TextBox3.Text)

Har også prøvet med .sellenght = 0

Markøren placeres for enden af teksten i boksen, men selve teksten bliver ikke markeret.

Gør det nogen forskel, at koden skal bruges i Word? - Denne kodning burde da være den samme som i VB???

Mon ikke du osse skal ha\' .selstart (txtbox.selstart=0) med?

Er det ikke en skrivefejl at du refererer til både Text1 og Text3 ?

Sæt det i formen :

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

..:: -[Neo.Nova]- ::..

Referencen til både text1 og 3 ER en skrivefejl.

Koden har jeg fået til at virke med:

    TextBox1.Text = \"HEJ\"
    TextBox1.SelStart = 0 
    TextBox1.SetFocus
(Dvs med både  selstart og setfocus )
    TextBox1.SelLength = Len(TextBox1.Text)

Mange tak for jeres bidrag, i får alle lidt point.
Men Brian, hvorfor har du kun kommenteret??? - Jeg kan ikke give dig point!

HH
Claus

Nogen fik ikke point. SORRY!

Jeg troede jeg kunne give flere point end jeg umiddelbart havde sat af.Så lærte man det :-)

Claus

Tjah, jeg tror at det var fordi jeg vile give dig et hurtigt svar. Men skidt med det - jeg klarer mig nok uden

No problemo :-)