by Z¨?? (2 Submissions)
Category: Files/File Controls/Input/Output
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sun 19th September 2004
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
This simple bit of code allows you to open files on your computer in a textbox. All the files information will be shown in a given textbox on
API Declarations
2) Copy the code for each section to the correct control
3) You dont need the 'Private Sub' part, That is to show what control the code is for.
REQUIREMENTS::
1 DirListBox
1 FileListBox
1 TextBox
1 Command Button
VBcoders
Private Sub Command1_Click()
On Error Resume Next
If File1.FileName > "" Then
Open Dir1.Path & "\" & File1.Path For Input As #1
Text1.Text = Input$(LOF(1), 1)
Close #1
End If
End Sub
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
THATS ALL!! 2 PARTS AND YOUR DONE!
No comments have been posted about This simple bit of code allows you to open files on your computer in a textbox. All the files infor. Why not be the first to post a comment about This simple bit of code allows you to open files on your computer in a textbox. All the files infor.
