VB.NET

VB.NET RSS

Binary Reader help needed for Beginner!

Please support our VB.NET advertiser: Intel Parallel Studio Home

•

Join Date: Mar 2008

Posts: 5

Reputation: ferrier18 is an unknown quantity at this point

Solved Threads: 0

ferrier18

Offline

Newbie Poster

Binary Reader help needed for Beginner!

Nov 6th, 2008

Hey Guys,
I'm trying to read a Binary file located at C:\Temp\SAMPLE.DAT
values in the file have been stored in format: int32,int32, Double.
1 33 172.50
2 55 40
3 77 5000
1 99 20
4 200 0

I'm trying to read the file and display the results in a richtextbox in this format:
1, 33, 172.50
2, 55, 40
3, 77, 5000
1, 99, 20

Here's the code that i have. I'm stuck and can't think of what else to do, any help would be much appreciated! Thank you very much.

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
   Dim vMessage As String
        Dim objBinRdr As New BinaryReader(New FileStream("C:\temp\sample.dat", FileMode.Open, FileAccess.Read))
        Dim rvValues As String
        Dim vDelimiters() As Char = {",", "/", ";", ":"}
 
        Do While objBinRdr.PeekChar <> -1
            rvValues = objBinRdr.ReadInt32.ToString(vDelimiters)
            vMessage = objBinRdr.ReadInt32()
            RichTextBox1.AppendText(vMessage)
 
        Loop
        objBinRdr.Close()
   Dim vMessage As String
        Dim objBinRdr As New BinaryReader(New FileStream("C:\temp\sample.dat", FileMode.Open, FileAccess.Read))
        Dim rvValues As String
        Dim vDelimiters() As Char = {",", "/", ";", ":"}

        Do While objBinRdr.PeekChar <> -1
            rvValues = objBinRdr.ReadInt32.ToString(vDelimiters)
            vMessage = objBinRdr.ReadInt32()
            RichTextBox1.AppendText(vMessage)

        Loop
        objBinRdr.Close()