Dim LineNumber as interger
Dim lngCOUNT as interger
Dim sFirst

LineNumber = 1
Dowhile LineNumber < lngCOUNT
open "C:\datain.dat" for input as #1
Line input #1, sFirst
Label1.caption = sFirst
Close #1
LineNumber = LineNumber + 1
EndDo

what i am doing is opening the dat file taking the first line and putting it in label1.caption....., 2nd line in label2.caption...or better yet to fix that problem attact it to a label? argh see my problems? hehe....well instead of a bunch of code each line trying to creat a loop any help? lngCOUNT is the total of lines that i did from a search earlier in the program.