您的位置：程序门 -> vb -> 基础类

关于treeview的问题!

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

关于treeview的问题!

发表于：2007-05-15 14:59:11 楼主

我在窗体中用了treeview控件.
private sub form_load（)
dim mynod as node
set mynod = tv1.nodes.add（, tvwchild, "china ", "中国 ")
set mynod = tv1.nodes.add（ "china ", tvwchild, "hb ", "安徽 ")
set mynod = tv1.nodes.add（ "china ", tvwchild, "sx ", "江苏 ")
end sub
当我选安徽的时候怎么样把安徽这两个字赋值给窗体中的一个文本框text1.谢谢了.

发表于：2007-05-15 15:38:021楼得分:0

private sub treeview1_nodeclick（byval node as mscomctllib.node)
dim nd as node
set nd = node

dim text as string
msgbox nd.text '得到text

end sub

发表于：2007-05-15 15:44:152楼得分:0

需要开始展开父节点

form load中添加

dim i as long
for i = 1 to treeview1.nodes.count
treeview1.nodes（i).expanded = true
next i

发表于：2007-05-15 16:04:013楼得分:0

在node click中
text.text=tv1.selecteditem.text

发表于：2007-05-15 16:53:034楼得分:0

priavate sub node_click（)

text1.text=tv1.selecteditem.text

………………

end sub

下一篇：datareport 的一个恶心问题!!!达人指教!
上一篇：新手初学,关于cos,sin角度值!

其他资讯