如何使用VB6从文本文件中读取数据？

Question

我需要从文本文件中读取数据并在我的应用程序中使用它.我使用VB 6.0.我使用什么命令？一些示例代码将受到高度赞赏.

Answer 1

以下是如何将整个文本文件读入字符串 - 从VB6手册.

Function FileToString(strFilename As String) As String
  iFile = FreeFile
  Open strFilename For Input As #iFile
    FileToString = StrConv(InputB(LOF(iFile), iFile), vbUnicode)
  Close #iFile
End Function

Answer 2

可以在此处找到完整的教程和示例代码

  Open Filename$ For Input As #FileHandle

  Do While Not EOF(FileHandle)        ' Loop until end of file
   Line Input #FileHandle, TextLine$  ' Read line into variable
    ' Your code here
  Loop

  Close #FileHandle