OpenFileDialog
打开文件对话框。
属性
- FileName
返回选择的文件名,含路径。
- MultiSelect
逻辑型,是否允许选择多个文件。
- FileNames
字符型数组,返回选定的多个文件,含路径。
- Filter
设置文件名筛选器。筛选器用符号“|”分为两个部分,前面是筛选器说明,后面是筛选器模式。
例如要选择文本文件,可设为:
文本文件|*.txt
一个筛选器可以包括多个筛选模式,不同的模式之间用分号隔开,例如:
图形文件|*.bmp;*.jpg;*.gif
可以同时设置多个过滤器,用符号“|”隔开即可,例如:
Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb
- Title
对话框标题
- InitialDirectory
打开对话框时,最初显示的目录。
方法
- ShowDialog
显示打开文件对话框。Show的返回值是DialogResult型枚举,如果用户单击的是确定按钮,则返回DialogResult.OK,如果单击的是“取消”按钮,则返回DialogResult.Cancel。
示例一
默认每次只能选择一个文件,通过FileName属性返回选择的文件名:
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
示例二
如果将MultiSelect属性设置为True,可以选择多个文件,通过FileNames属性返回选择的多个文件,例如:
Dim
dlg As
New OpenFileDialog
dlg.MultiSelect = True
If dlg.ShowDialog = DialogResult.OK
Then
OutPut.Show("你选择了"
& dlg.FileNames.Length & "个文件, 分别是:")
For
Each fl
As
String
In dlg.FileNames
Output.Show(fl)
Next
End If
本页地址:http://www.foxtable.com/webhelp/topics/0328.htm