Private Sub Form_Load()
    Dim LNArea As Node
    Set LNArea = TreeView1.Nodes.Add(, , "area", "辽宁省")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "沈阳")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "大连")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "鞍山")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "铁岭")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "阜新")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "朝阳")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "丹东")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "抚顺")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "葫芦岛")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "辽阳")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "本溪")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "锦州")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "盘锦")
        Set LNArea = TreeView1.Nodes.Add("area", tvwChild, "营口")
    LNArea.EnsureVisible
End Sub
执行的结果是只显示辽宁省,为什么啊?
请大家指点!谢谢!