Problemas con RichTextBox
Publicado por Juan (52 intervenciones) el 14/02/2010 18:19:25
Hola ,
Alguien me podría decir como resaltar varias palabras (diferentes) en un mismo RichTextBox. Utilizo lo siguiente:
Dim Pos As Long
Dim Inicio As Long
Dim fin As Long
Inicio = RichTextBox.SelStart
fin = Len(RichTextBox.Text)
Pos = RichTextBox4.Find("Palabra", Inicio, fin)
Con esto resalto la palabra "Palabra" en toda la longitud del RichTextBox. El problema es que cuando vuelvo a utilizar la misma sentencia pero con otra palabra me borra la primera selección y me resalta sólo la última. ¿Cómo puedo hacer para resaltar varias a la vez?
Gracias
Alguien me podría decir como resaltar varias palabras (diferentes) en un mismo RichTextBox. Utilizo lo siguiente:
Dim Pos As Long
Dim Inicio As Long
Dim fin As Long
Inicio = RichTextBox.SelStart
fin = Len(RichTextBox.Text)
Pos = RichTextBox4.Find("Palabra", Inicio, fin)
Con esto resalto la palabra "Palabra" en toda la longitud del RichTextBox. El problema es que cuando vuelvo a utilizar la misma sentencia pero con otra palabra me borra la primera selección y me resalta sólo la última. ¿Cómo puedo hacer para resaltar varias a la vez?
Gracias
Valora esta pregunta
0