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

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

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

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

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

為了模塊化，我們?cè)陧?xiàng)目中新建一個(gè)class，命名為OpenDirectoryDialog，輸入類似下面的代碼：

VB.NET對(duì)話框調(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()  
'對(duì)話框的title  
fb.Description = "Select a 
Directory to Scan" 
'默認(rèn)是系統(tǒng)的桌面目錄  
fb.StartLocation = Design.Folder
NameEditor.FolderBrowserFolder.Desktop  
'對(duì)話框的樣式  
fb.Style = Design.FolderNameEditor.
FolderBrowserStyles.ShowTextBox  
fb.ShowDialog()  
Return fb.DirectoryPath  
End Function  
End Class 

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

VB.NET對(duì)話框調(diào)用如下：

Debug.WriteLine(Open
DirectoryDialog.
ShowDialog())