Tesla.Angela 发表于 2010-12-24 17:33:20

读取文本文件的全部内容

这大概是我在2004年找到的，极好用，发出来备份，顺便给新人参考。

Public Function GetTxt(ByVal szFileName As String) As String
    Open szFileName For Binary As #1
      GetTxt = StrConv(InputB(LOF(1), 1), vbUnicode)
    Close #1
End Function


阿杰 发表于 2010-12-24 18:40:35

我就喜欢学习文件目录操作的代码
页: [1]
查看完整版本: 读取文本文件的全部内容