Prima di tutto ti consiglio di usare la Appendtext quindi di usare questo codice che dovrebbe funzionare:[b]
...solo che così mi colora tutto dello stesso colore. Dov'è che sbaglio?
![]()
Dim testo As String = "ciaociaocicoaicocoasofs"
Dim testolength As Integer = testo.Length
Dim Start As Integer = 0
RichTextBox1.Text = ""
For i As Integer = 0 To 10
Start = (testolength + 1) * i
RichTextBox1.AppendText(testo & vbCrLf)
RichTextBox1.Select(Start, testo.Length)
RichTextBox1.SelectionBackColor = Color.FromArgb(Color.Orange.ToArgb + (i * 5000))
Next
Credo che leggendolo capirai perchè il tuo codice non poteva funzionare, in particolare:
1) Come primo parametro del metodo Select è richiesto la posizione iniziale della selezione
2) Nel secondo parametro (lunghezza del testo), non consideri il byte per il ritorno a capo.
Ciao.

Rispondi quotando