How do I make this work in vb.net?

[dajunka]

I am trying to read/write a simple text file in net 2008 but can't, as yet, get it to work.
Any help would be appreciated.
This is how I use to do it in VB6

MyStr = App.Path & "\Data\Data.txt"

Open MtyStr For Input As #1
Do While Not EOF(1)
Input #1, Num(a, 0), Num(a, 1), Num(a, 2), Num(a, 3), Num(a, 4), Num(a, 5), Num(a, 6)

 a = a + 1
 
Loop
Close #1

[dglienna]

Look up the StreamReader() and StreamWriter() classes. That's the way to access files in VB.Net

Try these samples, also: http://code.msdn.microsoft.com/vbsamples/

[dajunka]

I found info about the streamreader/writer in my book and got it to work, the problem is that it reads/ writes the whole thing, I was looking for a way to read data individually separated by commas. Would you know of a simple way to do this?

[DataMiser]

The best way or at least a way I often use is to read the entire file and then use the split method to place it into an array. This works very well and is very fast.

[dajunka]

And there's me thinking it was going to be so easy.

Just need to find something helpful on splitting now.

[DataMiser]

It is actually very easy.

Use the streamreader to read either a line or the entire file into a string variable.

Dim an array and use the split function on your previous variable to break it down into each element.

Dim MyFile as new System.IO.StreamReader("\MyFile.Txt")
Dim FileContent as string=MyFile.ReadToEnd()
MyFile.Close
Dim FileFields as string()=FileContent.Split(",")

[dajunka]

Cool, thank you.
This is my code so far and it seems to be working very well except for the splitting bit.

 a = 0
        Dim objfile As New System.IO.StreamReader("c:\data.txt")
         Nationaldate = objfile.ReadLine()
                Do Until Nationaldate Is Nothing
                             
 ListNational.Items.Add(Nationaldate)
 Nationaldate = objfile.ReadLine()
            a = a + 1
        Loop
        objfile.Close()
        objfile.Dispose()
Label1.text= "Line Count = " & a+1

It loads in over 1000 lines, each line has 7 data entries.
How would I insert the split command to read the 7 separate data entries into a array at each loop?

[dglienna]

Split Nationaldate from inside the loop, and load the array (based on the value of a)

(a,0),(a,1),(a,3)

[dajunka]

The examples I have are a little unclear as to the wording or layout I would use to split it into a array (a, 0 ) through to (a,6) and my first few attempts have failed.

[HanneSThEGreaT]

VB.NET String Functions

I hope it helps a bit.

[dajunka]

Yeehee!! I have done it, and it works like a charm

Thank you so much for all of you who took time to help, it is very much appreciated.

Now that I have learned to load and save I can move on to other heroic tasks.

[HanneSThEGreaT]

Let me quote Neil Armstrong :

"One small step for Dajunka; one giant leap for developers"