vb中的控件属性保存
比如我要把text1.text保存到一个文件
要求弹出对话框显示保存路径和文件名
下面是我写的 条用commondialog
Cdl.DialogTitle = "保存文件"
Cdl.FileName = Fname
cd1.Filter = "文本文件(*.txt)|*.txt"
cd1.Flags = cdlOFNCreatePrompt + cdlOFNHideReadOnly
cd1.ShowSave
If Err = cdlCancel Then Exit Sub
怎么指定 保存text1.text的内容 ？
参考答案:你要自己写代码来实现，在你的程序后面添加：
Dim fs As Object
Set fs = CreateObject("scripting.filesystemobject")
If Not fs.fileexists(cd1.filename) Then
Set filenum = fs.CREATETEXTFILE(cd1.filename)
filenum.Close
End If
filenum = FreeFile
Open cd1.filename For Binary As #filenum
Put #filenum, 1, text1.text
Close #filenum