网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

VB.NET中如何使用TreeView控件

这篇文章将为大家详细讲解有关VB.NET中如何使用TreeView控件,文章内容质量较高,因此小编分享给大家做个参考,希望大家阅读完这篇文章后对相关知识有一定的了解。

创新互联公司专注于东兰网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供东兰营销型网站建设,东兰网站制作、东兰网页设计、东兰网站官网定制、微信小程序开发服务,打造东兰网络公司原创品牌,更为您提供东兰网站排名全网营销落地服务。

一、准备知识

1、了解 TreeView控件的基本使用,掌握如何添加树状结构的数据到TreeView控件中。

2、了解 ImageList 控件的基本使用。

3、了解VB.NET System.IO 命名空间中的Directory 类的一些常用用法,下面我们先了解下本文要用到Directory类的成员GetDirectories:它用于获取指定目录中子目录的名称。如下代码所示,获取C:盘下的子目录:

Dim dirs As String() = Directory.GetDirectories("c:\")

其结果是我们点开C盘后看到的文件夹,如果要获取更深层次的文件夹列表,就要一个一个文件夹循环使用Directory.GetDirectories方法。

二、窗体布局

在窗体上拖放一个TreeView控件,一个Button 按钮,一个ImageList 组件

然后把TreeView控件的ImageList 属性设置为 ImageList1,注意,TreeView控件还有一个 SelectedImageIndex 属性,它是用于获取或设置当树节点选定时所显示的图像的图像列表索引值。我们注意到其实VB.NET使用TreeView控件的每一个Node(节点)都有一个属于自己的 SelectedImageIndex 属性值,所以我们可以像设置节点的 ImageIndex 属性一样在运行时单位为每一个Node设置 SelectedImageIndex 属性。

三、编写代码

上面的准备工作和界面布置我们已经做好了,现在可以进行代码编写了。

首先,我们已经知道,要想获得树状结构的每个层次中的子文件夹,我们必须使用递归过程来完成,下面所示代码所执行的工作是:先把一个已经路径的文件夹添加到树状结构中,然后再遍历它的子文件夹:

  1. '添加文件夹  

  2. Public Sub AddDirectory(ByVal strFatherPath As String, 
    ByVal strPath As String, ByVal nodeFather As TreeNode)  

  3. Dim iDir As IO.Directory  

  4. Dim iDirInfo As IO.DirectoryInfo  

  5. Dim i As Integer  

  6. Dim node As New TreeNode  

  7. '先添加本目录,从文件夹路径分析出文件夹名称  

  8. node.Text = Strings.Replace(strPath, strFatherPath & "\", "", , 1)  

  9. '为单个节点指定节点未被选中时显示的图标  

  10. node.ImageIndex = 1 

  11. '为单个节点指定节点被选中时显示的图标  

  12. node.SelectedImageIndex = 2 

  13. nodeFather.Nodes.Add(node)  

  14. Application.DoEvents()  

  15. Try  

  16. Dim str() As String = iDir.GetDirectories(strPath)  

  17. '遍历该目录的子文件夹  

  18. For i = 0 To str.GetUpperBound(0)  

  19. AddDirectory(strPath, str(i), node)  

  20. Next  

  21. Catch ex As Exception  

  22. Debug.WriteLine(ex.Message  

  23. End Try  

  24. node = Nothing 

  25. iDir = Nothing 

  26. End Sub 

关于VB.NET中如何使用TreeView控件就分享到这里了,希望以上内容可以对大家有一定的帮助,可以学到更多知识。如果觉得文章不错,可以把它分享出去让更多的人看到。


新闻名称:VB.NET中如何使用TreeView控件
URL链接:http://bjjierui.cn/article/ghijoh.html

其他资讯