Non c'è modo di andare a cambiare o colorare solo un certo carattere?
Certamente.
Se vuoi utilizzare direttamente la stringa di caratteri, puoi fare ad esempio così:
Public Sub Form_Open()
TextLabel1.Text = "te<FONT color=#FF3300>s</FONT>to"
End
Ma mi pare che la tua necessità sia quella di cambiare il colore di un carattere operando all'interno della variabile di tipo Stringa che contiene il testo. Questo è posibile, ma in tal caso bisognerà porre i tag HTML all'interno di variabili di tipo Stringa (da utilizzare poi nel codice, ogni qualvolta che se ne abbia bisogno) e gestire un po' il testo con qualche funzione. Un esempio fra varie modalità può essere l'utilizzo di queste funzioni-stringa:
Public Sub Form_Open()
Dim j As Byte = 3
Dim s1, s2, s3 As String
s1 = "testo"
s2 = "<FONT color=#FF3300>"
s3 = "</font>"
' Effettuiamo la seguente operazione sulla stringa di testo di cui vogliamo modificare il terzo carattere da sinistra:
' ....prendiamo il primi due caratteri a sinistra e li mostriamo nella "TextLabel";
' poi inseriamo il primo tag HTML (scritto nella variabile s2) per la colorazione;
' poi prendiamo il terzo carattere (partendo da sinistra);
' poi inseriamo il tag HTML (scritto nella variabile s3) di chiusura;
' quindi scriviamo i restanti caratteri del testo, ed più precisamente un numero di caratteri partendo da destra pari
' alla lunghezza dell'intero testo meno 2 + 1: i primi due caratteri ed il carattere che abbiamo colorato:
TextLabel1.Text = Left(s1, 2) & s2 & Mid(s1, j, 1) & s3 & Right(s1, Len(s1) - (2 + 1))
End