Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Shaun E on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Can i link a text box to a txt file?
- Thread starter adi316
- Start date
Option Explicit
Private Sub Form_Load()
Dim fso As FileSystemObject
Dim tsTextStream As TextStream
Set fso = New FileSystemObject
Set tsTextStream = fs
penTextFile("C:\Text.txt", ForReading)
Me.Text1 = tsTextStream.ReadAll
tsTextStream.Close
Set tsTextStream = Nothing
Set fso = Nothing
End Sub
Private Sub Form_Load()
Dim fso As FileSystemObject
Dim tsTextStream As TextStream
Set fso = New FileSystemObject
Set tsTextStream = fs
penTextFile("C:\Text.txt", ForReading)Me.Text1 = tsTextStream.ReadAll
tsTextStream.Close
Set tsTextStream = Nothing
Set fso = Nothing
End Sub
TheVampire
Programmer
And make sure to add a reference to the Microsoft Scripting runtime ( Project/ References menu ). or you will get an error on the dim FSO statement.
Robert
Robert
- Status
Similar threads
- Locked
- Question
