Stream File VB.Net Tutorial

Imports System.IO
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
End Class