大家帮帮忙啦,有没有好的解决方法了.
搜索了以前的帖子,有那种 nodec.Checked = Not nodec.Checked那种解决方法,
Private Sub Timer1_Timer()
Timer1.Enabled = False
nodec.Checked = Not nodec.Checked
End Sub
Private Sub TreeView1_NodeCheck(ByVal Node As MSComctlLib.Node)
If tr = False Then
Set nodec = Node
Timer1.Enabled = True
End If
End Sub
可是效果不好,有明显的点击之后复选框值发生改变的效果.
有没有其他方法实现点击相应的复选框无效,但同时能点击node.text.可以查看node的内容,同时能查看其子node的内容.
很急呢,多谢各位高手帮忙啦.