怎样做到我每次打开通用对话框的时候里面的文本框里面都是空的??? 而且可以进行其他的比如恢复 保存操作??? 怎样做到我每次打开通用对话框的时候里面的文本框里面都是空的??? 而且可以进行其他的比如恢复 保存操作???(我的问题就是我每次打开文件对话框的时候,它会把上次操作的文件名填入到里面的文本框)谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 调用Commondialog.filename=""就可以清空文件名。 Private Sub Command1_Click() 'CancelError 为 True。 On Error GoTo ErrHandler CommonDialog1.FileName = "" '清空默认文件名 '设置过滤器。 CommonDialog1.Filter = "All Files (*.*)|*.*|Text _Files (*.txt)|*.txt|Batch Files (*.bat)|*.bat" '指定缺省过滤器。 CommonDialog1.FilterIndex = 2 '显示“打开”对话框。 CommonDialog1.ShowOpen '这个是显示“打开”,CommonDialog1.ShowSave是显示“打开” '调用打开文件的过程。 '…… '具体操作 MsgBox CommonDialog1.FileName ' 显示选定文件的名字 Exit SubErrHandler: '用户按“取消”按钮。 Exit SubEnd Sub 我对图片框进行类似于铅笔,橡皮,直线,矩形之类的操作时为什么后面添加的代码会对前面的有影响? 求助,呵呵,谢谢 请问如何压缩一个带密码的access数据库 我如何才能取一个大数的商 关于MSHFLEXGRID的宽度的问题 求教,有关vb的编程 谁有数据库 图书管理学生管理都可以 vb 中form背景颜色,要使用自己选的颜色要怎么做。 如何解决msflxgrd.ocx的过期问题??大家帮忙啊。 谁有ActiveReports的注册方法和使用技巧心得 请教查询图片数据库 提供hook的具体实例
Private Sub Command1_Click()
'CancelError 为 True。
On Error GoTo ErrHandler
CommonDialog1.FileName = "" '清空默认文件名
'设置过滤器。
CommonDialog1.Filter = "All Files (*.*)|*.*|Text _Files (*.txt)|*.txt|Batch Files (*.bat)|*.bat"
'指定缺省过滤器。
CommonDialog1.FilterIndex = 2
'显示“打开”对话框。
CommonDialog1.ShowOpen '这个是显示“打开”,CommonDialog1.ShowSave是显示“打开”
'调用打开文件的过程。
'…… '具体操作
MsgBox CommonDialog1.FileName
' 显示选定文件的名字
Exit Sub
ErrHandler:
'用户按“取消”按钮。
Exit Sub
End Sub