各位：
请大家伸手帮我解决一个小问题：
如何将运行结果输出到记事本中，并且有中文题目，在追加输出的过程中，中文题目只出现一次，这个小程序如何编写？请麻烦各位给予帮助。在此先谢谢。

你好
你辛苦了，先谢谢你。
我的意思是如下：
1、我已试过多次了，但没有成功，不知原因为何？
2、我想要的结果和形式如下（颜色字体）：
输出格式：
第一行是文字 ： 例如， 年 月 日
第二行是数字或其他内容与第一行相对应，07 06 03
第三行是数字或其他内容与第一行相对应，07 06 08
第四行是数字或其他内容与第一行相对应，07 06 10
……
……

这个txt文件中，只有第一行是文字（不一定是年月日的格式，这里只是举例而已），而从第二行以后的内容是数字或其他内容，你看如何解决？给你添麻烦了，再次谢谢你。

你好
我的程序如下，请查一查错误出在什么地方？

Private Sub Command1_Click()
dim a,b,c
a=text1.text:b=text2.text:c=text3.text
If nFile=newFile then
Open "f:\myfile.txt" For Append As nFile
print "年","月","日"
close
Else
Open "f:\myfile.txt" For Append As nFile
print a,b,c
close
End if
End Sub

你好：
你辛苦了，谢谢你，程序的过程，我大致看懂了。不过还有点小问题。
我想知道下面这个小程序是什么意思，我不懂，
Open "f:\myfile.txt" For Input As nFile
Line Input #nFile, str
Close #nFile
请你解释一下，好吗？

你好，
你的责任心很强，我非常感谢你
这次的程序我一看就明白了，以后多交流。
不过，我还有问题要向你请教：
如何将生成的exe文件能够在其他机子上的windows下运行？

你好：
首先，谢谢你的帮助。
我的小程序终于可以运行了，省了不少事。
我想说一有关打包的问题，你给评判一下，看是否有错，若是有错的话，请你给予指正，我的做法是：
先将程序编好，然后，保存，之后，按照你所说的打包方法进行打包，最后，生成exe文件。

不过有一个问题就是，运用“外接程序--打包和展开”时，总有一个提示，要求先保存，当按完确定之后，也不知是否已打包了？打包时有其他变化吗？