Ho provato diversi font ma non cambia nulla...
ho provato persino ad usare una nuova RichTextBox ma ancora niente..
Ecco il codice che avrei usato:
AllText.Text = contr.GenerateText() 'è una Stringa
Public Function GenerateText() As String
For y = 0 To 25
For t = 0 To _rand.Next(3, 13)
_text &= _altro(_rand.Next(0, 17)) 'la variabile _text è sempre una stringa
Next
_t = _rand.Next(0, _Preimp.Count) 'invece _t e un numerico
_text &= _Preimp(_t) '_Preimp è un List Of String
_Preimp.RemoveAt(_t) '_altro è un Array di Stringhe
Next
Return _text.Trim 'La Stringa che Restituisce
End Function