Imports System
Imports System.IO
Imports System.Text
Public Class MainClass
Shared Sub Main()
Dim memory_stream As New MemoryStream()
Dim binary_writer As New BinaryWriter(memory_stream)
binary_writer.Write("www.java2java.com")
Dim binary_reader As New BinaryReader(memory_stream)
memory_stream.Seek(0, SeekOrigin.Begin)
Console.WriteLine(binary_reader.ReadString())
binary_reader.Close()
End Sub
End Class
|