VB.NET是一款功能強大的開發(fā)平臺，大家可以通過它來實現(xiàn)一個功能強大，安全穩(wěn)定的開發(fā)環(huán)境。下面我們可以通過對VB.NET對話框的引用來對此進行一個詳細的介紹，希望能給大家?guī)硪恍椭?t#

VB.NET對話框調用概述：

我們都知道在.NET中調用一個打開文件的對話框很容易，定義一個OpenFileDialog類的實例就可以直接使用了。有時候我們需要讓用戶選擇一個工作目錄，或者一個系統(tǒng)目錄，于是就在搜索是不是有類似的OpenDirectoryDialog類呢?當然***有一個，這樣就很方便了。其實系統(tǒng)并沒有提供這么一個類，下面我們就采用很短的代碼構建這個目錄瀏覽對話框。

VB.NET對話框調用思想：

在項目的引用中，瀏覽一下，會發(fā)現(xiàn)有一個System.Designer.dll, 默認這個dll并沒有被項目引用，我們今天就把它引到項目中。在System.Windows.Forms.Design這個名控件下面有一個FolderNameEditor 類，其實就是一個目錄瀏覽對話框，只不過這個類不能直接使用，必須Inherit?？聪旅娴拇a：

為了模塊化，我們在項目中新建一個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"   
'默認是系統(tǒng)的桌面目錄   
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())