主题：请教一个目录树问题

如何能 当点击目录树第一层节点的“收”或“支”时，Combobox1中显示的是 “ ID ”;

         点击目录树第二层节点中的任一标题时，Combobox1中显示的是  “归类” ;

        点击目录树第三层节点中的任一标题时，Combobox1中显示的是  “ 名称” ;

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:目录树1.table

谢谢mr725老师！这个是显示节点名。

我的显示目录树代码是这样的：

Dim tv As WinForm.TreeView=e.Form.Controls("TreeView1")
tv.BuildTree("产品", "id|归类|名称")

我不是要在ComboBox1显示节点名，而是要在ComboBox1显示所点击节点显示tv.BuildTree("产品", "id|分类|名称") 里面的 “ID ”“归类”和“名称”

‘用这个办法可以，不知还有更科学的简洁的的代码没有

Dim tr As WinForm.TreeView = Forms("窗口1").Controls("TreeView1")
Dim nd As WinForm.TreeNode = tr.SelectedNode
If e.Node.Level = 0 Then
Forms("窗口1").Controls("ComboBox1").value = "Id"
Else If e.Node.Level = 1 Then
Forms("窗口1").Controls("ComboBox1").value ="归类"

Else If e.Node.Level = 2 Then
Forms("窗口1").Controls("ComboBox1").value ="名称"
End If