VB.NET对话框调用思想框架

开发 后端
如果大家想正确的实现VB.NET对话框调用,那么就可以通过一个OpenFileDialog类的定义来实现。具体的操作方法将会在文中详细给出。

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对话框调用代码:

 

  1. Imports System.Windows.Forms  
  2. Public Class FolderBrowserClass 
    FolderBrowser  
  3. Inherits System.Windows.Forms.
    Design.FolderNameEditor  
  4. Public Shared Function ShowDialog()
    Function ShowDialog() As String  
  5. Dim fb As New FolderBrowser()  
  6. '对话框的title  
  7. fb.Description = "Select a 
    Directory to Scan"
     
  8. '默认是系统的桌面目录  
  9. fb.StartLocation = Design.Folder
    NameEditor.FolderBrowserFolder.Desktop  
  10. '对话框的样式  
  11. fb.Style = Design.FolderNameEditor.
    FolderBrowserStyles.ShowTextBox  
  12. fb.ShowDialog()  
  13. Return fb.DirectoryPath  
  14. End Function  
  15. End Class 

 

编译好以后,我们就可以直接用这个Class了。

VB.NET对话框调用如下:

 

 

  1. Debug.WriteLine(Open
    DirectoryDialog.
    ShowDialog()) 

 

责任编辑:曹凯 来源: 博客园
相关推荐

2010-01-13 18:22:55

VB.NET对话框

2011-05-20 16:49:21

VB.NET

2010-01-22 16:27:19

VB.NET关于对话框

2009-10-20 14:05:42

VB.NET路径

2010-01-22 13:28:13

VB.NET对象克隆

2009-10-13 11:22:46

VB.NET调用Web

2010-01-19 18:24:29

VB.NET调用Win

2011-07-01 11:33:00

Qt 模态 非模态

2011-11-23 09:47:36

Winform

2009-10-28 10:15:48

VB.NET框架类库

2009-10-27 11:16:20

VB.NET应用框架

2009-10-12 10:04:53

VB.NET List

2009-11-03 12:52:38

VB.NET Wind

2010-01-19 13:36:16

VB.NET可选参数

2010-01-11 17:24:19

VB.NET异步调用

2009-11-10 16:55:05

VB.NET调用API

2009-10-29 11:26:28

VB.NET调用Web

2010-01-22 16:48:54

VB.NET调用SQL

2009-10-26 18:11:47

VB.NET调用Exc

2010-01-18 17:29:35

VB.NET函数调用
点赞
收藏

51CTO技术栈公众号