VB.NET中怎么調(diào)用對話框

本篇文章為大家展示了VB.NET中怎么調(diào)用對話框，內(nèi)容簡明扼要并且容易理解，絕對能使你眼前一亮，通過這篇文章的詳細介紹希望你能有所收獲。

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()) 

上述內(nèi)容就是VB.NET中怎么調(diào)用對話框，你們學到知識或技能了嗎？如果還想學到更多技能或者豐富自己的知識儲備，歡迎關注億速云行業(yè)資訊頻道。