以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  保存文件对话框  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=132164)

--  作者:drcqh
--  发布时间:2019/3/15 11:37:00
--  保存文件对话框
如何在打开保存文件对话框时自动填写文件名?
--  作者:有点甜
--  发布时间:2019/3/15 11:40:00
--  

Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog
dlg.Filter= "文本文件|*.txt" \'设置筛选器
dlg.FileName = "abc.txt"
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
    MessageBox.Show("你要保存为:" & dlg.FileName,"提示") \'提示用户选择的文件
End If

 


--  作者:drcqh
--  发布时间:2019/3/15 11:50:00
--  
谢谢!