TreeView 控件树状控件的填充VB以及 VS.NET C#源代码
习惯了树状结构，好像很多国外网站的开发者都称之为 NETSCAPTE PER，可能是因为当时 NETSCAPTE浏览器比较时髦，而且的确也好像是它的属性最开始使用这种对话框模式
VB下面作相对比较简单一点，VC就麻烦多了。闲话少说，[url=http://www.shengfang.org/blog/www.shengfang.org]www.shengfang.org说说填充
数据库：最简单的 的一个表ss 字段：ID/NAME/PARENT，分别代表ID，名称，和父节点的ID，最高层为0
随便几个 1/W/0 2/E/1 3/R/2 4/T/1分别[url=http://www.shengfang.org/blog/www.shengfang.org]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
Wh[url=http://www.shengfang.org/blog/www.shengfang.org]www.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_grou[url=http://www.shengfang.org/blog/www.shengfang.org]www.shengfang.orgp.Nodes(Str(rs!id) + "ssID").Selected = True
End If
rs.MoveNext
Wend
rs.Close
End Sub
首先得到所有的记录，[url=http://www.shengfang.org/blog/www.shengfang.org]www.shengfang.org然后把记录全部填充到树控件 TREECTRL的根目录下，然后把所有父节点非0的节点的PARENT属性设置给上一个KEY为PARENT字段的节点，这样，简简单单就全部填充完毕了
VS.NET就不一样了，PARENT属性好像是只读的，只能用递归
private void InitTree()
{
tree.Nodes.Clear();
Cls_Phs_Node [url=http://www.shengfang.org/blog/www.shengfang.org]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([url=http://www.shengfang.org/blog/www.shengfang.org]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.[url=http://www.shengfang.org/blog/www.shengfang.org]www.shengfang.orgNodes,dr["ID"].ToString(),table);
}
}
}
不是很明白为什么VS.NET里[url=http://www.shengfang.org/blog/www.shengfang.org]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);
// }
// }
