x xxtr93: grazie per l' idea
, mi è servita per migliorare il mio programma...
x Jeremy75: grazie per la soluzione!
io l' ho applicata così:
codice:
Private Sub Button1_Click() Handles Button1.Click
For a = 0 To TextBox1.TextLength - 1 Step 1
Select Case TextBox1.Text(a)
Case Chr(10)
Console.WriteLine("a capo 10")
Case Chr(13)
Console.WriteLine("a capo 13")
Case Is <> Chr(10), Chr(13)
Console.WriteLine("carattere " & TextBox1.Text(a))
End Select
Next
End Sub
...anche se non ho capito la differenza tra Chr(10) e Chr(13)...non ho approfondito più di tanto...