0

我在将文本导出到记事本时遇到问题。我曾经adwriteline表示每个文件,但是当文件中包含带有换行符或类似“¶”的文本时,代码出错了。问题是在我的电脑上,这条新行被导入到记事本中(更不用说这个导出的不可见新行已成功导入)但是当我在其他电脑上尝试时,新行是可见的。因此,产生错误。

谢谢并恭祝安康。

编辑:

当导出的文本在其句子中有新行时发生错误

出口:

adoStreamExport.WriteText Filepath &"' '" & child.Height & "' '" & child.Width, adWriteLine

进口:

fileIn = Split(Replace(adoStreamImport.ReadText, vbCrLf, "' '"), "' '")

scanText fileIn(indexCount), fileIn(indexCount + 2), fileIn(indexCount + 3)

Case "Text" SetValue value, value2, value3
4

0 回答 0