1,453
社区成员
发帖
与我相关
我的任务
分享Private Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
Dim nodX As Node
Set nodX = Form1.TreeView1.SelectedItem
If nodX.Text = "功能管理" Then '树节点名称
Form2.show
End If
End Sub