Streamに対する読み書きが終了した後、Closeメソッドを呼び出すことでStreamを閉じることができます。
Closeメソッドを使ってStreamを閉じる
Imports System
Imports System.IO
Class Sample
Shared Sub Main()
Dim stream As Stream = Nothing
Try
' Streamを開く
stream = File.OpenWrite("sample.dat")
Dim buffer() As Byte = New Byte(7) {&h41, &h42, &h43, &h44, &h45, &h46, &h47, &h48}
' streamにデータを書き込む
stream.Write(buffer, 0, 8)
Finally
' すべての処理が終わったらstreamを閉じる
If stream IsNot Nothing Then stream.Close()
End Try
End Sub
End Class