.NET开发

本类阅读TOP10
·NHibernate快速指南(翻译)
·vs.net 2005中文版下载地址收藏
·【小技巧】一个判断session是否过期的小技巧
·VB/ASP 调用 SQL Server 的存储过程
·？dos下编译.net程序找不到csc.exe文件
·通过Web Services上传和下载文件
·学习笔记（补）《.NET框架程序设计（修订版）》--目录
·VB.NET实现DirectDraw9 (2) 动画
·VB.NET实现DirectDraw9 (1) 托管的DDraw
·建站框架规范书之——文件命名

→ 分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
VB.NET 中调用浏览目录对话框

作者：未知 来源：月光软件站 加入时间：2005-2-28　月光软件站

VB.NET 中调用浏览目录对话框

Montaque

 

概述：

            我们都知道在.NET中调用一个打开文件的对话框很容易，定义一个OpenFileDialog类的实例就可以直接使用了。有时候我们需要让用户选择一个工作目录，或者一个系统目录，于是就在搜索是不是有类似的OpenDirectoryDialog类呢？当然最好有一个，这样就很方便了。其实系统并没有提供这么一个类，下面我们就采用很短的代码构建这个目录浏览对话框。

思想：

            在项目的引用中，浏览一下，会发现有一个System.Designer.dll, 默认这个dll并没有被项目引用，我们今天就把它引到项目中。在System.Windows.Forms.Design这个名控件下面有一个FolderNameEditor 类，其实就是一个目录浏览对话框，只不过这个类不能直接使用，必须Inherit。看下面的代码：

            为了模块化，我们在项目中新建一个class，命名为OpenDirectoryDialog，输入类似下面的代码：

代码：

 

Imports System.Windows.Forms

Public Class FolderBrowser

    Inherits System.Windows.Forms.Design.FolderNameEditor

 

    Public Shared Function ShowDialog() As String

        Dim fb As New FolderBrowser()

        '对话框的title

        fb.Description = "Select a Directory to Scan"

        '默认是系统的桌面目录

        fb.StartLocation = Design.FolderNameEditor.FolderBrowserFolder.Desktop

        '对话框的样式

        fb.Style = Design.FolderNameEditor.FolderBrowserStyles.ShowTextBox

        fb.ShowDialog()

 

        Return fb.DirectoryPath

    End Function

End Class

编译好以后，我们就可以直接用这个Class了。

调用如下：

 

Debug.WriteLine(OpenDirectoryDialog.ShowDialog())

 

我们将看到下面的对话框：

参考：ms-help://MS.VSCC/MS.MSDNVS.2052/cpref/html/frlrfsystemwindowsformsdesignfoldernameeditorclasstopic.htm

 

相关文章：

相关软件：