Treeview 关于选中节点的字体颜色控制问题.

[ykwang]

我找了一下午资料,还是找不到解决办法.
我们可以对每个节点的字体颜色赋值.如下
for a=1 to treeview1.nodes.count-1
treeview1.nodes(a).forecolor=vbred
next
这样可以搞定,但是当用户点击了某一个节点,该节点的字体颜色不知该如何设定.
我在 nodeclick 事件中 写上 node.forecolor=vbred
treeview1.refresh 也没有用.

望高手求救.

[junki]

试试：
Private Sub TreeView1_Click()
Dim ii As Integer
For ii = 1 To TreeView1.Nodes.Count
If TreeView1.Nodes.Item(ii).Selected = True Then
TreeView1.Nodes.Item(ii).ForeColor = vbRed
TreeView1.Nodes.Item(ii).BackColor = vbBlue
End If
Next
End Sub

[ykwang]

这个只能在鼠标移开后,颜色才有用.

[junki]

那你就模拟鼠标移动动作，让它看起来好像是直接显示了

[ykwang]

搞不定啊,求救各位高手