textbox控件如何保存文件？

Question

直接把Text.Text写到文本文件里不就行了
读的时候把文本文件打开，读出来赋给Text.Text属性

Answer 1

Private Function SaveFile as Long
On Error Goto nError
 '添加一个CommonDialog控件"cdFile",一个TextBox控件"txtText"
 cdFile.ShowOpen
 If cdFile.FileName="" Then Exit Function
 Open cdFile.FileName For Output As #1
  Print #1,txtText.Text
 Close #1
 SaveFile=1
 Exit Function
nError: SaveFile=0
End Function用这个函数(当然也可以写成过程，只是返回值不可用)就可以了。如果存储成功则返回1，否则返回0。

Answer 2

请问在 sworddx(剑宇潇湘) 的代码中SaveFile的作用是什么？
用于关闭文件的时候是否提示保存吗？

Answer 3

SaveFile就是这个自定义函数的名字，函数的返回值可以直接赋给它