Stream Reader: read int
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() Dim writer As BinaryWriter = New BinaryWriter(mstream) writer.Write(s) writer.Write(n) writer.Flush() ' Flush the buffer ' Reset the stream to the beginning mstream.Seek(0, SeekOrigin.Begin) ' Read from the stream Dim reader As BinaryReader = New BinaryReader(mstream) Dim s2 As String = reader.ReadString() Dim n2 As Integer = reader.ReadInt32() Console.WriteLine(s2 + " " + n2) End Sub End Class