使用文本文件时,您可能希望向现有文件中添加信息,而不是从头开始创建新的文本文件。为此,您需要做的只是打开文件以添加,而不是输出。

以下代码显示了此过程:

Open "MyFile.Dat" For Append As #1 For J = 1 to NewValues     Print #1, UserVals(OrigVals + J)

Next J Close #1

当为追加模式打开文件时,所有新信息都将添加到文件末尾,而不会干扰现有内容。

但是,请确保仅在非文档文本文件上使用此功能。如果您尝试在文档文件上执行此操作(这意味着您将“ MyFile.Dat”更改为“ MyFile.Doc”之类的文件,并且该文件已存在),那么很有可能该文档将被破坏,并且您将不再能够在Word中阅读它。

注意:

如果您想知道如何使用此页面(或_WordTips_网站上的任何其他页面)中描述的宏,我准备了一个包含有用信息的特殊页面。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

(Microsoft Word是世界上最流行的文字处理软件。)本技巧(11138)适用于Microsoft Word 2007、2010、2013、2016、2019和Office 365中的Word。 Word的旧菜单界面在这里: