PowerPoinT2010目录树控件TreeView的使用

1、效果图如下：

3、弹出“其他控件”窗口对话框，找到选择“Microsoft TreeView Control, version 5.0”=>点击“确定”，如下图所示：

5、调出控件属性窗体。在控件上点击鼠标右键＝〉点击“属性”，如下图所示：

7、用鼠标双击控件，弹出代码编辑窗口，编辑节点代码。可参照下列代码，编辑各节点，如下所示：Private Sub TreeView1_BeforeLabelEdit(Cancel As Integer)TreeView1.Nodes.ClearDim myNod As NodeSet myNod = TreeView1.Nodes.Add(, tvwChild, "china", "父节点1")Set myNod = TreeView1.Nodes.Add("china", tvwChild, "hb", "子节点11")Set myNod = TreeView1.Nodes.Add("china", tvwChild, "sx", "子节点12")Set myNod = TreeView1.Nodes.Add("china", tvwChild, "gz", "子节点13")Set myNod = TreeView1.Nodes.Add("sx", tvwChild, "a1", "孙节点121")Set myNod = TreeView1.Nodes.Add("sx", tvwChild, "a2", "孙节点122")Set myNod = TreeView1.Nodes.Add("gz", tvwChild, "b1", "孙节点131")Set myNod = TreeView1.Nodes.Add("gz", tvwChild, "b2", "孙节点132")Set myNod = TreeView1.Nodes.Add("gz", tvwChild, "b3", "孙节点133")Set myNod = TreeView1.Nodes.Add(, tvwChild, "lianji", "父节点2")Set myNod = TreeView1.Nodes.Add("lianji", tvwChild, "xiao", "子节点21")Set myNod = TreeView1.Nodes.Add("lianji", tvwChild, "chu", "子节点21")Set myNod = TreeView1.Nodes.Add("lianji", tvwChild, "gao", "子节点23")End Sub

9、放映，如下图所示：