Hi.
Ich hab ein kleines Problem mit dem Code...
Und zwar hab ich ihn ein wenig verändert, jetzt sieht er so aus:
Mein Aufruf Code bei RichTextBox1_TextChanged:
Nur es passiert nichts...
Und manchmal kommt sogar noch ein Error:
Weiß einer von euch, woran das liegen könnte?
Ich hab ein kleines Problem mit dem Code...
Und zwar hab ich ihn ein wenig verändert, jetzt sieht er so aus:
VB.NET-Quellcode
- Private Sub RichTextBox_Find(ByVal str As String, ByVal col As Color)
- Dim pos As Integer
- Do
- pos = Me.RichTextBox1.Find(str, pos + 1, Me.RichTextBox1.TextLength, RichTextBoxFinds.WholeWord)
- If pos = -1 Then Exit Do
- Me.RichTextBox1.SelectionStart = pos
- Me.RichTextBox1.SelectionLength = str.Length()
- Me.RichTextBox1.SelectionColor = col
- Loop
- End Sub
Mein Aufruf Code bei RichTextBox1_TextChanged:
Nur es passiert nichts...
Und manchmal kommt sogar noch ein Error:
Weiß einer von euch, woran das liegen könnte?