Beginner's Question on saving arrays to a file.

[Bill Maher]

I have an array that I use to write to the file on the C:\
drive.

I want to print the file. How can I do it.

Here is my code for the write to the file:

I'm using "writeline" . To allow for possibly deleted
items, i first check for emptry strings, and then I do
datMemory.write line(eachItem). Here is my code for saving:

Dim datMemory As New StreamWriter("M emoryHelper.txt ")
Dim intIndex As Integer
Dim intMaximum As Integer

intMaximum = lstDisplay.Item s.Count

Do Until intIndex = intMaximum

If Not MemRecords(intI ndex).strText = "" Then
datMemory.Write Line(MemRecords (intIndex).strS ubject)
datMemory.Write Line(MemRecords (intIndex).datD ate)
datMemory.Write Line(MemRecords (intIndex).strT ext)
Else
intMaximum += 1
End If
intIndex += 1
Loop

datMemory.Close ()
mblnIsDirty = False

[Mike Caputo]

Well, first I'd say you should use a "For Each" loop to make your life
easier (you can do this even with arrays since they now implement the
ICollection interface).

As for printing, just use a PrintDocument object.

--
Michael Caputo
Programmer/Database Administrator
Simon Economic Systems Ltd.
847-272-7691
mi************@ radarwire.com

"Bill Maher" <wm****@naic.or g> wrote in message
news:03******** *************** *****@phx.gbl.. .
I have an array that I use to write to the file on the C:\
drive.

I want to print the file. How can I do it.

Here is my code for the write to the file:

I'm using "writeline" . To allow for possibly deleted
items, i first check for emptry strings, and then I do
datMemory.write line(eachItem). Here is my code for saving:

Dim datMemory As New StreamWriter("M emoryHelper.txt ")
Dim intIndex As Integer
Dim intMaximum As Integer

intMaximum = lstDisplay.Item s.Count

Do Until intIndex = intMaximum

If Not MemRecords(intI ndex).strText = "" Then
datMemory.Write Line(MemRecords (intIndex).strS ubject)
datMemory.Write Line(MemRecords (intIndex).datD ate)
datMemory.Write Line(MemRecords (intIndex).strT ext)
Else
intMaximum += 1
End If
intIndex += 1
Loop

datMemory.Close ()
mblnIsDirty = False