以文本方式查看主题
- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求助:路径选择窗口做法(问题已解决) (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=6444)
|
-- 作者:migold
-- 发布时间:2010/4/3 10:59:00
-- 求助:路径选择窗口做法(问题已解决)
此主题相关图片如下:路径选择.jpg
如图:求助代码与做法
[此贴子已经被作者于2010-4-3 16:05:59编辑过]
|
-- 作者:yangming
-- 发布时间:2010/4/3 11:29:00
--
看帮助文件此段
OpenFileDialog
打开文件对话框。
属性
- Title
对话框标题
- InitialDirectory
打开对话框时,最初显示的目录。
- FileName
在对话框中选定的文件名。
- Filter
设置文件名筛选器。筛选器用符号“|”分为两个部分,前面是筛选器说明,后面是筛选器模式。 例如要选择文本文件,可设为: 文本文件|*.txt 一个筛选器可以包括多个筛选模式,不同的模式之间用分号隔开,例如: 图形文件|*.bmp;*.jpg;*.gif 可以同时设置多个过滤器,用符号“|”隔开即可,例如: Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb
方法
- ShowDialog
显示打开文件对话框。Show的返回值是DialogResult型枚举,如果用户单击的是确定按钮,则返回DialogResult.OK,如果单击的是“取消”按钮,则返回DialogResult.Cancel。
示例
请将下面的代码复制到命令窗口执行:
Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog dlg.Filter= "Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb" \'设置筛选器 If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮 MessageBox.Show("你选择的是:" & dlg.FileName,"提示") \'提示用户选择的文件 End If
|
-- 作者:migold
-- 发布时间:2010/4/3 16:04:00
--
我在帮助中找到 Dim dlg As New FolderBrowserDialog If dlg.ShowDialog = DialogResult.Ok Then
End If 根本上解决了,谢谢2楼楼主
|