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
Tidak ada komentar:
Posting Komentar