MemoryStream Demo : Memory Stream « File Directory « VB.Net






MemoryStream Demo

MemoryStream Demo
 
Imports System.Data
Imports System.IO
Imports System.IO.IsolatedStorage
Imports System.Text
Imports System.Runtime.Serialization
Imports System.Runtime.Serialization.Formatters
Imports System.Runtime.Serialization.Formatters.Soap
Imports System.Runtime.Serialization.Formatters.Binary
Imports System.Windows.Forms

Public Class MainClass
    
    Shared Sub Main(ByVal args As String())
        Dim s As String = "111"
        Dim n As Integer = 452
        Dim mstream As Stream = New MemoryStream()
        ' Write to the stream
        Dim bytes1() As Byte = UnicodeEncoding.Unicode.GetBytes(s)
        Dim bytes2() As Byte = BitConverter.GetBytes(n)
        mstream.Write(bytes1, 0, bytes1.Length)
        mstream.Write(bytes2, 0, bytes2.Length)

        ' Reset the stream to the beginning
        mstream.Seek(0, SeekOrigin.Begin)

        ' Read from the stream
        Dim bytes3(mstream.Length - 4) As Byte
        Dim bytes4(4) As Byte
        mstream.Read(bytes3, 0, bytes3.Length)
        mstream.Read(bytes4, 0, bytes4.Length)

        ' Do something with the data
        Console.WriteLine(UnicodeEncoding.Unicode.GetString(bytes3) + " " + BitConverter.ToInt32(bytes4, 0))
    End Sub
End Class


           
         
  








Related examples in the same category

1.Memory Stream Writer and ReaderMemory Stream Writer and Reader
2.Stream Reader and Writer for a MemoryStreamStream Reader and Writer for a MemoryStream
3.MemoryStream Class creates a stream whose backing store is memory.