VB.NET对话框调用思想框架

VB.NET开发平台的应用帮助编程人员实现了稳固安全的程序。初学者们在实际学习的过程中可以通过不断的经验积累来熟练应用这一编程语言。下面我们就介绍一下其中的一个应用技巧,基于VB.NET对话框调用的代码实现。#t#

VB.NET对话框调用概述:

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

VB.NET对话框调用思想:

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

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

VB.NET对话框调用代码:

 

 
 
 
  1. Imports System.Windows.Forms  
  2. Public Class FolderBrowserClass 
    FolderBrowser  
  3. Inherits System.Windows.Forms.
    Design.FolderNameEditor  
  4. Public Shared Function ShowDialog()
    Function ShowDialog() As String  
  5. Dim fb As New FolderBrowser()  
  6. '对话框的title  
  7. fb.Description = "Select a 
    Directory to Scan"
     
  8. '默认是系统的桌面目录  
  9. fb.StartLocation = Design.Folder
    NameEditor.FolderBrowserFolder.Desktop  
  10. '对话框的样式  
  11. fb.Style = Design.FolderNameEditor.
    FolderBrowserStyles.ShowTextBox  
  12. fb.ShowDialog()  
  13. Return fb.DirectoryPath  
  14. End Function  
  15. End Class 

 

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

VB.NET对话框调用如下:

 

 

 
 
 
  1. Debug.WriteLine(Open
    DirectoryDialog.
    ShowDialog()) 

 

THE END