如图所示，ifix中添加treeview控件，不显示子节点，不知道怎么回事，求解决

Private Sub CommandButton2_Click()

TreeView2.Nodes.Clear

TreeView2.HotTracking = True

Dim nodeIndex As Node

TreeView2.ImageList = ImageList1

Set nodeIndex = TreeView2.Nodes.Add(, , "no1", "皮带系统", "K1")

Set nodeIndex = TreeView2.Nodes.Add(, , "no2", "排水系统", "K2")

Set nodeIndex = TreeView2.Nodes.Add(, , "no3", "选煤系统", "K3")

Set nodeIndex = TreeView2.Nodes.Add(, , "no4", "提升系统", "K4")

Set nodeIndex = TreeView2.Nodes.Add(, , "no5", "通风系统", "K1")

Set nodeIndex = TreeView2.Nodes.Add("no1", tvwChild, "num1", "西翼皮带", "K2")

Set nodeIndex = TreeView2.Nodes.Add("no1", tvwChild, "num2", "东翼皮带", "K2")

End Sub