TreeViewでノードを最初から開かせておく

解決


クズ牌様の弟子  2004-02-05 14:05:18  No: 81853  IP: [192.*.*.*]

VB6を使って製作しているのですが、Treeviewの使用に当たって
ノードを最初から開かせておく方法をお教えください。

編集 削除
6de74  2004-02-05 15:48:55  No: 81854  IP: [192.*.*.*]

TreeViewのExpandedプロパティを使えばできますよ。

編集 削除
ねろ  2004-02-05 16:07:04  No: 81855  IP: [192.*.*.*]

Nodeを作りながら開く場合は
Dim nodx As Node
Set nodx = TreeView1.Nodes.Add(Parent, tvwChild,.............)
nodx.EnsureVisible
こんな感じで
既に出来ているノードを開く場合や、ノードを全て作った後
一斉に開く場再は
For n = 1 To TreeView1.Nodes.Count
    TreeView1.Nodes.Item(n).Expanded = True
Next
となります。  
ただしEnsureVisibleを使う場合にNodeの数が多い場合は速度は相当に遅くなります。

編集 削除
クズ牌様の弟子  2004-02-10 09:26:26  No: 81856  IP: [192.*.*.*]

ありがとうございました。
無事実装することができました。

編集 削除