writes the first line of a text file to the list box in form
writes the first line of a text file to the list box in form
Rate writes the first line of a text file to the list box in form
(2(2 Vote))
Dim objFSO As FileSystemObject
Dim objTXT As TextStream
Dim str$
Set objFSO = New FileSystemObject
If objFSO.FileExists("c:\rem.txt") Then
objTXT = objFSO.OpenTextFile("c:\rem.txt", ForReading)
End If
str = objTXT.ReadLine
End Sub
writes the first line of a text file to the list box in form Comments
No comments yet — be the first to post one!
Post a Comment