vb资源文件导出和保存文件对话框利用
我现在编vb程序,用visualstudio2012.我往资源里添加一个zip文件,当我运行这个程序时,如何通过保存文件对话框来将其中的zip文件保存到我的电脑里。。...
我现在编vb程序,用visual studio 2012.我往资源里添加一个zip文件,当我运行这个程序时,如何通过保存文件对话框来将其中的zip文件保存到我的电脑里。。
展开
1个回答
展开全部
VB使用CommonDialog控件(“打开”、“另存为”对话框)来实现。
CommonDialog控件(“打开”、“另存为”对话框),通过使用 CommonDialog 控件的 ShowOpen 和 ShowSave 方法可显示“打开”和“另存为”对话框。
两个对话框均可用以指定驱动器,目录,文件扩展名和文件名。除对话的标题不同外,另存为对话外观上与打开对话相似。
在运行时,当用户选择一个文件“关闭”对话框时,FileName 属性既为选定的文件名。
CommonDialog控件(“打开”、“另存为”对话框)示例
下例显示“打开”对话框然后在信息框中显示所选的文件名:
Private Sub Command1_Click()
' 设置“CancelError”为 True
CommonDialog1.CancelError = True
On Error GoTo ErrHandler
' 设置标志
CommonDialog1.Flags = cdlOFNHideReadOnly
' 设置过滤器
CommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" & _
"(*.txt)|*.txt|Batch Files (*.bat)|*.bat"
' 指定缺省的过滤器
CommonDialog1.FilterIndex = 2
' 显示“打开”对话框
CommonDialog1.ShowOpen
' 显示选定文件的名字
MsgBox CommonDialog1.filename
Exit Sub
ErrHandler:
' 用户按了“取消”按钮
Exit Sub
End Sub
CommonDialog控件(“打开”、“另存为”对话框),通过使用 CommonDialog 控件的 ShowOpen 和 ShowSave 方法可显示“打开”和“另存为”对话框。
两个对话框均可用以指定驱动器,目录,文件扩展名和文件名。除对话的标题不同外,另存为对话外观上与打开对话相似。
在运行时,当用户选择一个文件“关闭”对话框时,FileName 属性既为选定的文件名。
CommonDialog控件(“打开”、“另存为”对话框)示例
下例显示“打开”对话框然后在信息框中显示所选的文件名:
Private Sub Command1_Click()
' 设置“CancelError”为 True
CommonDialog1.CancelError = True
On Error GoTo ErrHandler
' 设置标志
CommonDialog1.Flags = cdlOFNHideReadOnly
' 设置过滤器
CommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" & _
"(*.txt)|*.txt|Batch Files (*.bat)|*.bat"
' 指定缺省的过滤器
CommonDialog1.FilterIndex = 2
' 显示“打开”对话框
CommonDialog1.ShowOpen
' 显示选定文件的名字
MsgBox CommonDialog1.filename
Exit Sub
ErrHandler:
' 用户按了“取消”按钮
Exit Sub
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询