用模块级变量来实现,当点击其中一个TreeView时,在其NodeClick事件中改变局变量的值,如:Private m_Tree1Select as Boolean Private m_Tree2Select as BooleanPrivate Sub tvw1_NodeClick(ByVal Node As MSComctlLib.Node) m_Tree1Select = True '改变全局变量的值 m_Tree2Select =False End SubPrivate Sub tvw2_NodeClick(ByVal Node As MSComctlLib.Node) m_Tree2Select = True '改变全局变量的值 m_Tree1Select =False End Sub然后再进行相应的操作判断即可
Private m_Tree2Select as BooleanPrivate Sub tvw1_NodeClick(ByVal Node As MSComctlLib.Node)
m_Tree1Select = True '改变全局变量的值
m_Tree2Select =False
End SubPrivate Sub tvw2_NodeClick(ByVal Node As MSComctlLib.Node)
m_Tree2Select = True '改变全局变量的值
m_Tree1Select =False
End Sub然后再进行相应的操作判断即可