Textbox med farve og mere..

Der skal du nok skrive i en rich text box for det vil lade sig gøre!

Jeg ved ikke om det virker med det skulle det gerne.

form_load()
intWords = \"0\"
end sub

RTB_change()\'rich text boxen kode til change
intWord = intWord + 1

If not intWord = \"4\" then
RTB.selstart 0
rtb.selcolor = RGB(22,66,99)
end if
If intWord = \"4\" then
RTB.selstart 4
RTB.Selcolor = vbRed
end if
end sub

Jeg er ikke sikker på at det virker men du kan prøve, jag kan ikke lige det med baggrundsfarve men prøv dig fra med det hvis det virker!

Hvis den melder fejl med RTB.selstart 0 så prøv RTB.selstart RTB.text,0
og det samme med den næste bare byt 0 ud med 4

mvh. Martin

den med richtextbox kender jeg godt
og det virker fint,...
men igen, den kan ikke lave baggrundsfarve :o(
det er sådan set det eneste problem med den

Det kan jeg ikke hjælpe dig med desværre, hvis der ikke et en baggrunds funktion.

/f2

Hvis nu din RichTekstbox hedder Text1

Kunne du så ikke bare skrive

Text1.backcolor = vbRed

Så bliver den da rød..
eller vi du have den pr ord ?

/Mix

pr. bogstav nærmere!..

-