VB 怎样将生成的文件通过‘选择文件夹’方式保存
发布网友
发布时间：2022-05-07 13:49
共3个回答
热心网友
时间：2023-07-27 01:07
CommonDialog控件可以显示如下常用对话框：
“打开”
“另存为”
“颜色”
“字体”
“打印”
要使用CommonDialog控件
1．添加CommonDialog控件，则应从“工程”菜单中选定“部件”，将控件添加到工具箱中。在标记对话的“控件”中找到并选定空间，然后单击“确定”按钮。
2．单击工具箱中的“CommonDialog”控件并在窗体上绘制该控件。在窗体上绘制CommonDialog控件时，控件将自动调整大小。像Timer控件一样，CommonDialog控件在运行时不可见。
3．运行时，请适当使用下表所列方法显示需要的对话。
-----------------------------------------------------------
方法 显示的对话框
ShowOpen 打开
ShowSave 另存为
ShowColor 颜色
ShowFont 字体
ShowPrinter 打印
ShowHelp 调用 Windows “帮助
-----------------------------------------------------------------------------
显示“打开”和“另存为”对话框
有了“打开”对话框就可以指定驱动器、目录、文件扩展名和文件名。“另存为”对话框在外观上与“打开”对话框相同，只是对话框的标题和文件名是暗淡的。运行时选定文件并关闭对话框后，可用FileName属性获取选定的文件名。
要显示“打开”对话框：
1．指定在“文件类型”列表框中显示的文件过滤器列表。
可用下列格式设置Filter属性：
description1|filter1|description2|filter2…
Dscription是列表框中显示的字符串 ---- 例如：“Text Files(*.txt)”。Filter是实际的文件过滤器 ---- 例如：“*.txt”。每个description|filter设置间必须用管道符号（|）分隔。
2．用ShowOpen方法显示对话框。
在出现的对话框里选定文件后可用FileName属性获取选定文件的名称。
对所有公共对话框，当CancelError属性为True，而且拥护单击了对话框的“取消”按钮时将生成一个错误。在显示对话框时捕获错误，以此检测是否按了“取消”按钮。
下列代码显示“打开”对话框并以选定的文件名为打开文件过程的参数：
Private Sub Command1_Click()
'CancelError属性为True。
On Error GoTo ErrHandler
'设置过滤器
CommonDialog1.Filter = "All Files（*.*）|*.*|Text Files（*.txt）|*.txt|Batch Files（*.bat）|*.bat"
'指定缺省过滤器。
CommonDialog1.FilterIndex = 2
'显示“打开”对话框。
CommonDialog1.ShowOpen
'调用打开文件的过程
OpenFile(CommonDialog1.FileName) '注意：这里是一个自定义打开文件的过程
Exit Sub
ErrHandler:
'用户按“取消”按钮。
Exit Sub
End Sub
热心网友
时间：2023-07-27 01:07
你现在CommonDialog1控件画到窗体上，然后在“保存”按钮中调用它既可，调用代码最简单的就是增加以下这句：
CommonDialog1.ShowSave
当然还可以设置其他属性哦，如保存文件类型、保存文件默认位置等等。
热心网友
时间：2023-07-27 01:07
