ник: Силыч
хм.... не знаю, Олег, у меня вот так вот на ноде root отключается спокойно
Private Sub tv_NodeCheck(ByVal Node As MSComctlLib.Node)
Select Case Node.Tag
Case "root":
Node.Checked = False
End Select
End Sub
зы.
может попробуй так сделать:
If Node.Key = "r_0" Then ' флажок установлен
DoEvents ' флажок установлен
Node.Checked = False ' флажок НЕ установлен
exit sub ' :)))
End If ' флажок НЕ установлен
' флажок установлен