Highligt keywords

Så skal du bruge en RichTextBox kontrol.
Her kan du formattere enkelte strenge i teksten separat ved først at vælge den streng der skal formatteres vha SelLenght, SelStart osv, og derefter ændre vha SelColor, SelFontName, SelFontSize osv.

RichTextBox er ikke en standard-kontrol, så du skal tilføje den til dit projekt via Project/Components...

MVH tjacob

Mange tak for points. Det var måske lidt rigeligt med 100 points for så lidt ;-)

ok, men det var jo en stor hjælp til at komme igang på. Nu må jeg til at finde ud af lidt mere...ved du et godt sted jeg kan smug kigge for at få lidt hjælp? ( Er lidt ny inden for vb :-))

Først og fremmest: Lær at bruge MSDN library. Der er ufatteligt mange oplysninger her, men det kan nogen gange være lidt besværligt lige at finde det man skal bruge.
MSDN har også en net del: http://www.microsoft.com/msdn/ hvor der er endnu flere oplysninger.

Ellers bruger jeg selv http://www.planetsourcecode.com en del. Her er der både tutorials, samt ikke mindst fantastisk mange VB-projekter med kildekode, så man kan se hvordan andre har gjort det.

tjacob

mange tak for hjælpen allerede! Men måske du kan hjælpe mig mere....jeg har kigget i de links du sagde og tror jeg har fundet ud af hvordan man f.eks ændrer hele teksten....men hvis nu man vil søge hele teksten igennem for keywords...hvad gør man så? Altsp hvis jeg nu foreksempel vil have If og End If markereret i en and farve?

Der er en VB-funktion der hedder InStr(), der er beregnet til at finde en streng i en anden.:

dim a as long

a = InStr (1, StrengDerSøgesI, StrengDerSøgesEfter)

Starter i karakter 1 og vil returnere et heltal der angiver, hvor i strengen den søgne streng findes først.

Du kan så lave en rutine der render hele teksten igennem, og for hver gang der ikke returneres et 0 (dvs at ordet er fundet), så køres InStr igen, men denne gang er det første argument nu a + længden af ordet.

Eksempel: Instr(1, \"Jeg hedder nu tjacob\", \" nu \")
vil returnere 11.

MVH tjacob