Imports System.IO
Public Class Tester
Public Shared Sub Main
Dim fs As System.IO.FileStream
Dim w As System.IO.BinaryWriter
Dim buffer As String
Dim c As Char
c = Chr(9)
fs = New System.IO.FileStream("test.txt", IO.FileMode.OpenOrCreate)
w = New System.IO.BinaryWriter(fs)
w.Seek(0, System.IO.SeekOrigin.Begin)
w.Write("writing data via BinaryWriter")
w.Close()
fs.Close()
End Sub
End Class
Imports System.IO
Public Class Tester
Public Shared Sub Main
Dim f As System.IO.FileStream
Dim r As System.IO.StreamReader
Dim mylength As Integer
Dim i As Integer
f = New System.IO.FileStream("test.txt", IO.FileMode.Open, IO.FileAccess.Read)
r = New System.IO.StreamReader(f)
Console.WriteLine(r.ReadToEnd())
f.Close()
r.Close()
End Sub
End Class