Dim strVlez As String
         Open "C:\zipTest\data.txt" For Input As 1
                Line Input #1, strVlez    ' prv red
                MsgBox strVlez
                Line Input #1, strVlez    ' vtor red
                MsgBox strVlez
       
            Close 1