Open Text File In Visual Basic Classic 1

These following Microsoft Visual Basic Classic source code for open text file using Open statement:

Dim intFile As Integer

Dim strData As String

intFile = FreeFile

'App.Path can change to CurDir

Open App.Path + "\myTextFile.txt" For Input As #intFile

strData = Input(LOF(intFile), intFile)

Close #intFile

Related Post

• Fungsi File Dalam Visual Basic 6
• Learn About Visual Basic Classic List 1
• Current Directory In Command Prompt
• Study About Microsoft Office 1