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