关于文件文本格式保存的问题

来源：百度知道 编辑：UC知道 时间：2024/05/29 17:24:32
窗体上有两个控件:text1和command1.
运行时,在文本框内输入文字后,点击command1时,可以将其内容保存为一个以现在日期为文件名的文本文件.
怎么做到?
我希望有高手能给予适当的注释,谢谢!因为我在编辑的过程中,老是出错.理来理去头绪都乱了.

感激不尽!
一楼的"很好很强大"
可是问题出现了
不知道你试过没有,生成的文件里的内容,都是用双引号("")括起来的.怎么才能消除?

Private Sub Command1_Click()

Open "d:\ " & Date & " .txt" For Output As #1 ' 打开输出文件 如果没有自动生成
Write #1, Text1.Text ' 写入TEXT1里面的数据
Close #1 ' 关闭
End Sub

Output是覆盖 改为append变添加~以往的内容不会丢失
Write是数据加引号保存在文本中 如果改Print则没有引号

我不是说了！！你有没有认真看我上面这些话啊？？
Private Sub Command1_Click()

Open "d:\ " & Date & " .txt" For Output As #1
Write #1, Text1.Text ' 写入TEXT1里面的数据 '这里的write 改成print 就没引号了
Close #1 ' 关闭
End Sub