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對話框調用代碼：

Imports System.Windows.Forms  
Public Class FolderBrowserClass 
FolderBrowser  
Inherits System.Windows.Forms.
Design.FolderNameEditor  
Public Shared Function ShowDialog()
Function ShowDialog() As String  
Dim fb As New FolderBrowser()  
'對話框的title  
fb.Description = "Select a 
Directory to Scan" 
'默認是系統的桌面目錄  
fb.StartLocation = Design.Folder
NameEditor.FolderBrowserFolder.Desktop  
'對話框的樣式  
fb.Style = Design.FolderNameEditor.
FolderBrowserStyles.ShowTextBox  
fb.ShowDialog()  
Return fb.DirectoryPath  
End Function  
End Class 

編譯好以后，我們就可以直接用這個Class了。

VB.NET對話框調用如下：

Debug.WriteLine(Open
DirectoryDialog.
ShowDialog())