Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > .NET Languages
You last visited: Today at 12:32

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



VB Richtextbox Frage

Discussion on VB Richtextbox Frage within the .NET Languages forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 238
Join Date: Sep 2009
Posts: 2,327
Received Thanks: 1,160
VB Richtextbox Frage

Hallo Com,

ich möchte das ein Wort in einer Richtextbox eine andere Farbe bekommt.
aber nur ein einzelnes wort.

Beispiel
Code:
 start
[COLOR="Blue"]Say[/COLOR] ("Hallo du")
[COLOR="#0000ff"]say[/COLOR] ("HoHo")
[COLOR="#0000ff"]wait ( )[/COLOR]
Der code sollte so aussehen
PHP Code:
If RichTextBox1.Text.Contains("Say"Then
            
// und hier weis ich nicht weiter...
        
End If 
Also er entdeckt das Wort Say aber das wars auch schon...

Danke schonmal im Vorraus

APC



mrapc is offline  
Old 05/02/2011, 13:29   #2
 
elite*gold: 0
The Black Market: 471/0/0
Join Date: Apr 2010
Posts: 9,695
Received Thanks: 1,807
Such mal in Google nach .SelectionStart() & .SelectionColor().


Kraizy​ is offline  
Thanks
1 User
Old 05/02/2011, 14:51   #3
 
elite*gold: 238
Join Date: Sep 2009
Posts: 2,327
Received Thanks: 1,160
danke aber man kann das nicht verwenden

So kann man zwar
Richtextbox1.select ("Say")

aber es verschwindet beim nächstem klick...
mrapc is offline  
Old 05/02/2011, 15:03   #4
 
elite*gold: 0
The Black Market: 471/0/0
Join Date: Apr 2010
Posts: 9,695
Received Thanks: 1,807
PHP Code:
Public Sub Markiere(Wort as stringFarbe as color)
     
dim mc as MatchCollection Regex.Matches(rtb.text.tolowerwort.tolower)

     For 
each m as Match in mc
          rtb
.select(m.indexm.length)
          
rtb.selectioncolor farbe
          rtb
.select(rtb.text.length0)
          
rtb.selectioncolor color.black
     Next
End Sub 


Kraizy​ is offline  
Thanks
1 User
Old 05/02/2011, 21:34   #5
 
elite*gold: 238
Join Date: Sep 2009
Posts: 2,327
Received Thanks: 1,160
Soll ich dann "m" in Say umändern?
mrapc is offline  
Old 05/02/2011, 21:37   #6
 
elite*gold: 0
The Black Market: 471/0/0
Join Date: Apr 2010
Posts: 9,695
Received Thanks: 1,807
Du sollst die Methode aufrufen, z.B. per Button: Markiere("say", Color.Blue)
Kraizy​ is offline  
Thanks
1 User
Old 05/03/2011, 17:28   #7
 
elite*gold: 238
Join Date: Sep 2009
Posts: 2,327
Received Thanks: 1,160
OK Danke
Hier der COde wie ich den haben musste:
PHP Code:
Dim mc As System.Text.RegularExpressions.MatchCollection System.Text.RegularExpressions.Regex.Matches(RichTextBox1.Text.ToLowerWort.ToLower)

        For 
Each m As System.Text.RegularExpressions.Match In mc
            RichTextBox1
.Select(m.Indexm.Length)
            
RichTextBox1.SelectionColor Farbe
            RichTextBox1
.Select(RichTextBox1.Text.Length0)
            
RichTextBox1.SelectionColor Color.Black
        Next
    End Sub 
Zum Aufrufen
PHP Code:
If Richtextbox1.text.contains ("Say"Then
Markiere
("say"Color.Blue)
End If 
1000 mal Danke an xKraizy
mrapc is offline  
Old 05/03/2011, 18:55   #8
 
elite*gold: 0
The Black Market: 471/0/0
Join Date: Apr 2010
Posts: 9,695
Received Thanks: 1,807
Die If-Abfrage brauchst du gar nicht. Pack die Zeile: Markiere("say", Color.Blue) in das TextChanged-Ereignis der RichTextBox und beim Schreiben, wird automatisch das Wort markiert.
Kraizy​ is offline  
Thanks
1 User
Old 05/03/2011, 19:15   #9
 
elite*gold: 238
Join Date: Sep 2009
Posts: 2,327
Received Thanks: 1,160
JA wenn es aber nicht exestiert kommt ein fehler
mrapc is offline  
Old 05/03/2011, 19:47   #10
 
elite*gold: 0
The Black Market: 471/0/0
Join Date: Apr 2010
Posts: 9,695
Received Thanks: 1,807
Also bei mir nicht..
PHP Code:
Imports System.Text.RegularExpressions
Public Class Form1
    
Public Sub Markiere(ByVal Wort As StringByVal Farbe As Color)
        
Dim mc As MatchCollection Regex.Matches(RichTextBox1.Text.ToLowerWort.ToLower)

        For 
Each m As Match In mc
            RichTextBox1
.Select(m.Indexm.Length)
            
RichTextBox1.SelectionColor Farbe
            RichTextBox1
.Select(RichTextBox1.Text.Length0)
            
RichTextBox1.SelectionColor Color.Black
        Next
    End Sub

    
Private Sub RichTextBox1_TextChanged(ByVal sender As System.ObjectByVal e As System.EventArgsHandles RichTextBox1.TextChanged
        Markiere
("say"Color.Blue)
    
End Sub
End 
Class 
Wenn ich schreibe, wird der Text ganz normal in der RTB angezeigt, wenn ich dann inrgendwann "say" schreibe wird es blau markiert. Es kommt aber kein Fehler..
Kraizy​ is offline  
Thanks
1 User
Old 05/04/2011, 14:45   #11
 
elite*gold: 238
Join Date: Sep 2009
Posts: 2,327
Received Thanks: 1,160
mh naja auch egal aber danke für deine Hilfe


mrapc is offline  
Reply



« [VB.Net]Hack Frage :< | Visual Basic - Text in "irgendwas" codieren ?? »

Similar Threads
C# - RichTextBox, einzelne Zeilen auslesen
03/05/2011 - .NET Languages - 2 Replies
Ich habe eine Kleine frage zur RichTextBox. und zwar möchte ich einen kleinen Syntax Highlighter schreiben, bzw. habe dies schon getan. Ich habe das ganze mit Regex gemacht und dann eine foreach Schleife für die Matches geschrieben. Das Problem ist aber, dass er jedes mal wenn man den Text verändert, den GESAMTEN Inhalt der RichTextBox auf neue Keywords überprüft. Das ganze kann aber, vor allem bei langen Scripts, ziehmlich lange dauern! Es würde ja vollkommen ausreichen, wenn er nur...
Richtextbox Text anhängen
06/30/2010 - General Coding - 0 Replies
Gelöst!!! Lösung: Die Methode appendtext() sry für die dumme Frage :( Hallo, Als Erstes ich bin kein guter Vb.Net Coder besonders da ich kaum mit ihr was zu tun habe, aber ich wollte und konnte dieses Programm nur unter Vb realisieren.
[Visual C#] von public static void richtextbox in einer Form steuern
06/12/2010 - .NET Languages - 2 Replies
Hallo liebe Coders Erstmal vielen Dank das ihr immer so fleißig helft.. Ich hab mal wieder ein neues Problem: public static void txtboxaktu() { Form1 f1 = new Form1(); f1.richTextBox2Form1.Text = "test";
TextBox und RichTextBox [VB]
06/06/2010 - .NET Languages - 7 Replies
Hi, Ich hab ein Problem und zwar...: Ich will das man in einer RichBox nicht schreiben kann und das wenn man den Text in der TB eingiebt da er erscheint in der RichBox aber dann wenn man einen anderen Text angibt das er dann nicht verschwindet.



All times are GMT +1. The time now is 12:32.


Powered by vBulletin®
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

BTC: 33E6kMtxYa7dApCFzrS3Jb7U3NrVvo8nsK
ETH: 0xc6ec801B7563A4376751F33b0573308aDa611E05

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2019 elitepvpers All Rights Reserved.