>Dim loBinaryReader As IO.BinaryReader >Dim loByte() As Byte >Dim loFileStream As IO.FileStream >loFileStream = New IO.FileStream(tcFileName, FileMode.Open, FileAccess.Read) >loBinaryReader = New IO.BinaryReader(loFileStream) >loByte = loBinaryReader.ReadBytes(CType(loFileStream.Length, Integer)) >>
Private Function UnicodeBytesToString( _ ByVal bytes() As Byte) _ As String Return System.Text.Encoding.Unicode.GetString(bytes) End FunctionCetin