转至繁体中文版     | 网站首页 | 图文教程 | 资源下载 | 站长博客 | 图片素材 | 武汉seo | 武汉网站优化 | 
最新公告:     敏韬网|教学资源学习资料永久免费分享站!  [mintao  2008年9月2日]        
您现在的位置: 学习笔记 >> 图文教程 >> 软件开发 >> VB.NET程序 >> 正文
TreeView 控件树状控件的填充VB以及 VS.NET C#源代码         ★★★★

TreeView 控件树状控件的填充VB以及 VS.NET C#源代码

作者:闵涛 文章来源:闵涛的学习笔记 点击数:988 更新时间:2009/4/23 15:39:05
TreeView 控件树状控件的填充VB以及 VS.NET C#源代码 天气2005年2月23日09:25星期三  [Dev开发]

习惯了树状结构,好像很多国外网站的开发者都称之为 NETSCAPTE PER,可能是因为当时 NETSCAPTE浏览器比较时髦,而且的确也好像是它的属性最开始使用这种对话框模式

VB下面作相对比较简单一点,VC就麻烦多了。闲话少说,www.shengfang.org说说填充


数据库:最简单的 的一个表ss 字段:ID/NAME/PARENT,分别代表ID,名称,和父节点的ID,最高层为0

随便几个 1/W/0 2/E/1 3/R/2 4/T/1分别www.shengfang.org代表四个不同的节点。


VB就很简单了:

cmd.CommandText = "select * from ss"
rs.CursorLocation = adUseClient
rs.Open cmd, , adOpenDynamic, adLockOptimistic

''''ss.Nodes.Clear
If rs.RecordCount <> 0 Then
    rs.MoveFirst
End If
Whwww.shengfang.orgile (rs.EOF = False)
    Set nodd = tv_group.Nodes.Add(, tvwLast, Str(rs!id) + "ssID", _
        rs!name, 1)
    Debug.Print nodd.Key
    rs.MoveNext
Wend

If rs.RecordCount <> 0 Then
    rs.MoveFirst
End If
While (rs.EOF = False)
    If (rs!parent <> 0) Then
        Set tv_group.Nodes(Str(rs!id) + "ssID").parent = tv_group.Nodes(Str( _
            rs!parent) + "ssID")
    Else
        tv_grouwww.shengfang.orgp.Nodes(Str(rs!id) + "ssID").Selected = True
    End If
    rs.MoveNext
Wend

rs.Close

End Sub

首先得到所有的记录,www.shengfang.org然后把记录全部填充到树控件 TREECTRL的根目录下,然后把所有父节点非0的节点的PARENT属性设置给上一个KEY为PARENT字段的节点,这样,简简单单就全部填充完毕了


VS.NET就不一样了,PARENT属性好像是只读的,只能用递归

private void InitTree()
  {
   tree.Nodes.Clear();
   Cls_Phs_Node www.shengfang.orgclsnodeP=new Cls_Phs_Node("ss"); //由于TREEVIEW在.NET中的NODE节点属性好像没有KEY这个属性,所以只能自己继承一个类,扩充一个KEY
   clsnodeP.key="0";
   tree.Nodes.Add(clsnodeP); //定义了一个根节点
   OleDbDataAdapter da=new OleDbDataAdapter("select * from ss;",SQLConn);
   DataTable dt=new DataTable();
   da.Fill(dt);
   da.Dispose();
   FillTree(tree.Nodes[0].Nodes,"0",dt);
   }

//把数据库表的数据填充在根节点下面
  private void FillTree(www.shengfang.orgTreeNodeCollection nodes,string parentKey,DataTable table)
  {
   foreach(DataRow dr in table.Rows)
   {
    if(dr["parent"].ToString()==parentKey.ToString())
    {
     Cls_Phs_Node clsnode=new Cls_Phs_Node(dr["name"].ToString().Trim());
     clsnode.key=dr["ID"].ToString().Trim();
     clsnode.type =dr["parent"].ToString().Trim();
     nodes.Add(clsnode);
     FillTree(clsnode.www.shengfang.orgNodes,dr["ID"].ToString(),table);
     }
    }
   }

不是很明白为什么VS.NET里www.shengfang.org面的TREEVIEW控件省掉了NODE的自带KEY属性以及PARENT属性变成只读的,不过没有办法。

这是网上的一个例子,用的DATAVIEW

//  public void FillTree(TreeNodeCollection  Nds,string parentId,DataSet ds,string TableName)
//  {       
//   DataView dv=new DataView();
//   TreeNode  tmpNd;
//   string intId;
//   dv.Table=ds.Tables[TableName];
//   dv.RowFilter="ParentId="  + parentId ;
//   foreach(DataRowView drv in dv)
//   {   
//    tmpNd=new TreeNode();
//    tmpNd.Tag =drv[0].ToString(); 
//    tmpNd.Text=drv[2].ToString(); 
//    Nds.Add(tmpNd);
//    intId=drv[1].ToString();    
//    InitTree(tmpNd.Nodes,tmpNd.Tag.ToString(),ds,TableName);
//    }
//   }


[系统软件]VS.net 2005 Beta 下载地址(Express Edition)  [常用软件]TreeView 控件应用详解
[VB.NET程序]Henry手记-VB.NET中动态加载Treeview节点(二)  [VB.NET程序]Henry手记-VB.NET中动态加载Treeview节点(一)
[Delphi程序]Delphi中为TreeView添加单选和复选框  [Delphi程序]Object TreeView简要说明
[Delphi程序]Delphi下Treeview控件基于节点编号的访问  [Delphi程序]Delphi 2006(DeXter) & VS.NET 2005[原创]
[VB.NET程序]将listview中显示出来的记录拖到treeview中去  [VB.NET程序]vbscript版的TreeView,也就是树
教程录入:mintao    责任编辑:mintao 
  • 上一篇教程:

  • 下一篇教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    同类栏目
    · C语言系列  · VB.NET程序
    · JAVA开发  · Delphi程序
    · 脚本语言
    更多内容
    热门推荐 更多内容
  • 没有教程
  • 赞助链接
    更多内容
    闵涛博文 更多关于武汉SEO的内容
    500 - 内部服务器错误。

    500 - 内部服务器错误。

    您查找的资源存在问题,因而无法显示。

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved.
    闵涛 投放广告、内容合作请Q我! E_mail:admin@mintao.net(欢迎提供学习资源)

    站长:MinTao ICP备案号:鄂ICP备11006601号-18

    闵涛站盟:医药大全-武穴网A打造BCD……
    咸宁网络警察报警平台