treeview为什么checkbox不能全部都初始化为选中状态

Jolins 2010-07-05 11:13:02

在添加节点的时候把节点的checkbox属性设置为true为什么没有一点效果

我先是在代码Set objNode = Treeview1.Nodes.Add( ……
后面加了objNode.checked = true

发现不行，后来又用遍历来做

for i =1 to Treeview1.Nodes.Count
Treeview1.Nodes(i).Checked = true
next i

结果还是没有任何效果，所有的checkbox都是未选中的状态

各位高手能否帮我看看，到底哪儿出问题了

...全文

129 19 打赏收藏转发到动态举报

写回复

用AI写文章

19 条回复

切换为时间正序

请发表友善的回复…

发表回复

king06 2010-07-06

打赏
举报

[Quote=引用 13 楼 jolins 的回复:]
谢谢king,问题解决了,不过如果你有时间能否告诉我为啥写在form_load里不行呢

结分,3Q
[/Quote]
个人认为是form_load里面,treeview没有重绘,直到form_load完成.

Jolins 2010-07-06

打赏
举报

谢谢king,问题解决了,不过如果你有时间能否告诉我为啥写在form_load里不行呢

结分,3Q

Jolins 2010-07-06

打赏
举报

哦,可是我另外做了一个,在form_load是完全没问题的,可是原来的里面就是不行

奇怪了,另外可否请楼上高人告诉我这个为什么要写在activate事件里吗,俺VB初学者,呵呵

king06 2010-07-06

打赏
举报

[Quote=引用 6 楼 jolins 的回复:]
引用 5 楼 king06 的回复:
VB code
Private Sub Form_Activate()
Dim i As Long
TreeView1.CheckBoxes = True
TreeView1.Refresh
For i = 1 To TreeView1.Nodes.Count
TreeView1.Nodes(i).Checked = True
……

……
[/Quote]
你看我写在什么事件里。。。

jhone99 2010-07-06

打赏
举报

如果单独测试应该可以通过吧，看是否执行该程序过程中会触发其他事件

jhone99 2010-07-06

打赏
举报

发过来，看看
email: li1639999@163.com

Jolins 2010-07-06

打赏
举报

晕死了，本来以为很简单的事情为啥搞不定

舉杯邀明月 2010-07-06

打赏
举报

Ding.......

Jolins 2010-07-06

打赏
举报

[Quote=引用 5 楼 king06 的回复:]
VB code
Private Sub Form_Activate()
Dim i As Long
TreeView1.CheckBoxes = True
TreeView1.Refresh
For i = 1 To TreeView1.Nodes.Count
TreeView1.Nodes(i).Checked = True
……
[/Quote]

这么写没有用，我也是这么写的

king06 2010-07-06

打赏
举报

Private Sub Form_Activate()

    Dim i As Long

    TreeView1.CheckBoxes = True

    TreeView1.Refresh

    For i = 1 To TreeView1.Nodes.Count

        TreeView1.Nodes(i).Checked = True

    Next

End Sub