[Mono-dev] This code not this worked in Linux.

[LB Audio Uchoa NET]

Module1.vb

 

Module Module1

    Sub Main()

        FileOpen(1, "file.txt", OpenMode.Input, OpenAccess.Read)

        Do Until EOF(1)

            Console.Write(LineInput(1) & Chr(10) & Chr(13))

        Loop

        FileClose(1)

    End Sub

End Module

 


file.txt

 

Hello Word Line 01

Hello Word Line 02

Hello Word Line 03

 

 

Some help?
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.ximian.com/pipermail/mono-devel-list/attachments/20070424/2cd4c325/attachment.html