[Admiral]

Я в VB6 так считывал все строки

Код:

intFH=FreeFile
Open "C:\Boot.ini" For Input As intFH
Do Until EOF(IntFH)
        Line Input #intFH, strString
        strText=strText & strString & VbLf
Loop

Для VB2008 будет так

Код:

Dim fileReader As String
        fileReader = My.Computer.FileSystem.ReadAllText("C:\Boot.ini")
        MsgBox(fileReader)