CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 Richtextbox

(1/1)

eddy_rv:
HOLA A TODOS, ESTOY INTENTANDO REALIZAR UN PROGRAMA Q ME SAQUE DATOS DE MI BD, MAS O MENOS DE LA SIGUIENTE MANERA, (con un color diferente cada linea:

DATOS11111A
DATOS22222A

DATOS11111B
DATOS22222B

DATOS11111C
DATOS22222C

Y asi, lo estoy haciendo de la siguiente manera con una funcion, lo q hago es sacar el dato y lo seleciono y le pongo un color, lo mismo con la segunda fila, pero a medida de q la iteracion avanza toma dominio el primer color, no se porque:


--- Código: Text --- Dim conta As Integerconta = 0For i = 1 To 10Me.RichTextBox1.Text &= "DATOS111111X" & vbNewLineMe.RichTextBox1.Select(conta, Me.RichTextBox1.Text.Length)Me.RichTextBox1.SelectionColor = Color.Goldconta = Me.RichTextBox1.Text.LengthMe.RichTextBox1.Text &= "DATOS222222X" & vbNewLineMe.RichTextBox1.Select(conta, Me.RichTextBox1.Text.Length)Me.RichTextBox1.SelectionColor = Color.DarkCyanconta = Me.RichTextBox1.Text.LengthNext  
en fin despues de correr todo apere como :

DATOS11111A
DATOS22222A

DATOS11111B
DATOS22222B

DATOS11111C
DATOS22222C

Si alguien sabe porque sucede esto se lo agradeceria mucho.

Saludos y GRacias

Navegación

[0] Índice de Mensajes