Reading lines from files..

[sue205]

It depends on how the files are going to stored. Random access, Sequential Files??
Line Input or Input could be used.

[ae_jester]

Dim strLine As String
    Open "C:\Temp\test.txt" For Input As #1
    Do While Not EOF(1)
        Line Input #1, strLine
        txtDisplay.Text = txtDisplay.Text & strLine & vbCrLf
    Loop
    Close #1

Make sure you set the MultiLine property of the textbox to True!

[vbBoy]

Thanks for your replies guys.

The file is stored as a normal text file. The code from ae_jester is like the one i used before accept for the "Line" in front of "Input". I tried it but it still did not work.

vbBoy.

[mendhak]

What is the exact problem you are facing now?

[vbBoy]

Thanks for the reply mendhak.

The exact problem is that I have this text file that I would like to display its contents line by line on a text box. I could display it but the lines follow each other directly and not line by line as it is stored in the text file.


vbBoy.

[johnLoveless]

What is the delimiter that separates each 'line' then ?

If it is not a CR/FL then there must be a character that delimits
each line/record/field.

Let me know the chars, and I'll send you a routine to read the file, and 'unpack' the input string and then manipulate as individual lines/records.

i.e. is the record

1) "ID", "Field1" , "Field2", "Field3"
2) 123, "aaa" , "bbb", "ccc"
3) 456, "ddd", "eee", "fff"
4) etc,

or

1)123, "aaa" , "bbb", "ccc"<DELIM CHAR>456, "ddd", "eee", "fff" etc,

[vbBoy]

Hello johnLoveless...

There is no delimiter that seperates the lines. The text looks like this:
___________________________________________________

How are you?

What are doing tonight? Will you like to go to the mcdonalds?

Say at 08:00 hours.
___________________________________________________


Thanks

vbBoy

[Cytharni]

Dim strLine As String
Open "C:\Temp\test.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, strLine
txtDisplay.Text = txtDisplay.Text & strLine & Chr(13) & Chr(10)
Loop
Close #1

=-=-=-=-=-=-=-=-=-=-=-=-=-=-

I've used the original code used, then changed the vbCrLf (I think?) to Chr(13) and Chr(10) which is a Carriage return and line feed...

[Bruce Fox]

vBoy,

Post (attach) the textfile in question as the Line Input
examples should have worked.

[vbBoy]

Thanks for your reply guys....

The code from Cytharni works just as I wanted.


vbBoy

[johnLoveless]

Have a look at the attached and let me know what else is needed
and/or what is wrong etc.