
05/04/2006, 11:24
|
| | Fecha de Ingreso: julio-2005
Mensajes: 7
Antigüedad: 19 años, 6 meses Puntos: 0 | |
RichTextBox Hola a todos, en las siguientes lineas por q se pierde el color cada ves q va incrementando el for.
Dim conta As Integer
conta = 0
For i = 1 To 10
Me.RichTextBox1.Text &= "prue" & vbNewLine
Me.RichTextBox1.Select(conta, Me.RichTextBox1.Text.Length)
Me.RichTextBox1.SelectionColor = Color.Gold
conta = Me.RichTextBox1.Text.Length
Me.RichTextBox1.Text &= "prueba2" & vbNewLine
Me.RichTextBox1.Select(conta, Me.RichTextBox1.Text.Length)
Me.RichTextBox1.SelectionColor = Color.DarkCyan
conta = Me.RichTextBox1.Text.Length
Next
Tien algun problema este contro?
Saludos y gracias |