VB.NET開發(fā)平臺的應用幫助編程人員實現(xiàn)了穩(wěn)固安全的程序。初學者們在實際學習的過程中可以通過不斷的經(jīng)驗積累來熟練應用這一編程語言。下面我們就介紹一下其中的一個應用技巧，基于VB.NET對話框調(diào)用的代碼實現(xiàn)。#t#

VB.NET對話框調(diào)用概述：

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

VB.NET對話框調(diào)用思想：

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

為了模塊化，我們在項目中新建一個class，命名為OpenDirectoryDialog，輸入類似下面的代碼：

VB.NET對話框調(diào)用代碼：

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對話框調(diào)用如下：

Debug.WriteLine(Open
DirectoryDialog.
ShowDialog())