microsoft common dialog control的问题

[cyclamen]

我调用microsoft common dialog control
在弹出Saveas对话款的时候，我想在对话框你填入一个
缺省的文件名，不知如何才可以？

[weity]

yourobject.filename=app.path & "\your.txt"
yourobject.showsave

[Janven]

下面是CommonDialog1的常用例子
With CommonDialog1
.DialogTitle = "命令名"
.Filter = "可执行文件(*.exe;*.com)|*.exe|所有文件 (*.*)|*.*"
.CancelError = True
.FileName = "DefaultName"
.ShowSave
If Err.Number <> cdlCancel Then
'在此可以加入你点击确定后想要实现的程序，如
text1.Text = CommonDialog1.FileName
End If
End With

[wulang]

同意以上各人的意见 CommonDialog1.FileName = "缺省的文件名"

[Carrie]

用object.FileName = pathname, 其中pathname写上文件名就可以了.

[mafangsan]

Private Sub Command1_Click()
CommonDialog1.FileName = "test.txt"
CommonDialog1.ShowSave
End Sub

[bamboo]

注意，如果对公用对话框设置了缺省文件名，就一定要注意CanceError的用法。否则很难判断用户按下的是"OK"还是"Cancel"。