当前节点的颜色和你设置的颜色冲突。
Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1")
For Each nd As winform.treenode In tr.allNodes
nd.backColor = Color.White '恢复节点默认颜色
Next
For Each nd As winform.treenode In tr.allNodes
If nd.Name = Mtbn Then
'---选中当前节点
'tr.SelectedNode = nd
nd.backColor = Color.LightSkyBlue
Exit For '退出循环
End If
Next