回 帖 发 新 帖 刷新版面

主题:请教一个VB长字符串的问题

在word中想将一文件全部读入放到一个字符串变量中,发现只能读253个字符。但VB不是说可以放2^31个字符吗?至少也要放64K个字符啊!请问该怎么解决?程序如下
Sub Macro1()
Dim hFile As Long
hFile = FreeFile
Open "d:\temp\a.txt" For Input As hFile
Dim str As String
str = Input(LOF(hFile), #hFile)
End Sub

回复列表 (共3个回复)

沙发

dim Zt as string, str As String
Open "d:\temp\a.txt" For Input As hFile
    Do Until EOF(1)
      Line Input #1, Zt
      Str = Str & Zt & vbCrLf
    Loop
    Close hFile

板凳

谢谢!为什么必须加一个vbCrLf才能突破253个字符的限制,还望大虾明示,另外刚才又测试了一下还是不行,不知怎么办?

3 楼

到底是txt呢,还是doc?

我来回复

您尚未登录,请登录后再回复。点此登录或注册