Public Class Tester Public Shared Sub Main Dim fs As System.IO.FileStream Dim buffer As String Dim i As Integer Dim myarray(100) As Byte
fs = New System.IO.FileStream("test.txt", IO.FileMode.OpenOrCreate)
For i = 0 To 99
myarray(i) = i
Next
fs.Seek(0, System.IO.SeekOrigin.End)
fs.Write(myarray, 0, 100)
fs.Close() End Sub