关于treeview控件的用法

zook0k 2006-05-15 04:56:42
请教关于treeview控件的用法
另外希望大家详细指点一下如何利用中文msdn帮助系统
希望高手交个朋友
帮忙我一下
我qq82197730
...全文
193 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
cznxxjf 2006-05-31
  • 打赏
  • 举报
回复
msdn里有详细的用法和例程。
选中TreeView控件按F1就可以调msdn了啊
yumanqing 2006-05-31
  • 打赏
  • 举报
回复
楼上的好
3q2008Com 2006-05-31
  • 打赏
  • 举报
回复
Option Explicit
Dim i As Integer

Private Sub Command1_Click()
'加载一个 父节点

TreeView1.Nodes.Add , , "Keymain" & i, "父节点" & i, 1
i = i + 1
End Sub

Private Sub Command2_Click()
'在最后一个父节点加子节点
TreeView1.Nodes("Keymain" & i - 1).Expanded = True
'展开节点
Static j
TreeView1.Nodes.Add "Keymain" & i - 1, tvwChild, "key" & j, "加子节点" & j, 2
j = j + 1
End Sub

Private Sub Command3_Click()
'改变最后一个子节点对象的图标
Dim CldNode As Node
Set CldNode = TreeView1.Nodes(i - 1).Child

Do Until CldNode Is Nothing
CldNode.Image = 3
Set CldNode = CldNode.Next
Loop
End Sub
yedl830128 2006-05-15
  • 打赏
  • 举报
回复
我来顶

1,451

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧