7,762
社区成员
发帖
与我相关
我的任务
分享有关树型的问题请教
如何直接找到树型节点，如树型： 101 一级A
10101 二级A1
10102 二级A2
102 一级B
10201 二级B1
10202 二级B2
怎么样直接找到10201，既把10201设为当前
10101 二级A1
10102 二级A2
102 一级B
10201 二级B1
10202 二级B2
怎么样直接找到10201，既把10201设为当前
...全文
请发表友善的回复…
发表回复
liul17 2003-09-09
- 打赏
- 举报
For i = 1 To TreeView1.Nodes.count
if TreeView1.Nodes(i).text="10201 二级A2" then
TreeView1.Nodes(i).Selected = True
exit for
end if
next
if TreeView1.Nodes(i).text="10201 二级A2" then
TreeView1.Nodes(i).Selected = True
exit for
end if
next
northwolves 2003-09-09
- 打赏
- 举报
Private Sub Command2_Click()
TreeView1.SetFocus
For i = 1 To TreeView1.Nodes.Count
If TreeView1.Nodes(i).Text = 10201 Then TreeView1.Nodes(i).Selected = True
Next
End Sub
TreeView1.SetFocus
For i = 1 To TreeView1.Nodes.Count
If TreeView1.Nodes(i).Text = 10201 Then TreeView1.Nodes(i).Selected = True
Next
End Sub
wzj1321 2003-09-09
- 打赏
- 举报
是我表达有问题吗？？大家看不明白我问什么吗？
还是没人知道？
还是没人知道？
linfuyong 2003-09-09
- 打赏
- 举报
找出后退出循环
linfuyong 2003-09-09
- 打赏
- 举报
For i = 1 To TreeView1.Nodes.count
if TreeView1.Nodes(i).text=10201 then
TreeView1.Nodes(i).Selected = True
TreeView1.Nodes(i).Bold = True
TreeView1.Nodes(i).ForeColor = &HFF&
endif
next
if TreeView1.Nodes(i).text=10201 then
TreeView1.Nodes(i).Selected = True
TreeView1.Nodes(i).Bold = True
TreeView1.Nodes(i).ForeColor = &HFF&
endif
next
wzj1321 2003-09-09
- 打赏
- 举报
我的意识是直接指向10201这个节点，用什么方法？？
jlum99 2003-09-09
- 打赏
- 举报
霍夫曼编码?有现成的算法啊
