System IO VB.Net by API

Imports System.IO
public class Test
   public Shared Sub Main
        Dim memory_stream As New MemoryStream()
        Dim stream_writer As New StreamWriter(memory_stream)
        stream_writer.Write("aaa.")
        stream_writer.Flush()
        Dim stream_reader As New StreamReader(memory_stream)
        memory_stream.Seek(0, SeekOrigin.Begin)
        Console.WriteLine(stream_reader.ReadToEnd())
        stream_reader.Close()
   End Sub
End class