Ho fatto cosi però leggo tutta la linea :
Dim leggi As New IO.StreamReader("C:\promo.txt")
Dim linea As String = String.Empty
Dim arrtext As New ArrayList()
Do
linea = leggi.ReadLine()
If Not linea Is Nothing Then
arrtext.Add(linea)
End If
Loop Until linea Is Nothing
leggi.Close()
For Each linea In arrtext
MsgBox(linea)
Next
Io dovrei leggere invece di tutta la linea una parte della linea, dal carattere 20 al 30 ad esempio ....
Grazie.