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

解決

クズ牌様の弟子 2004-02-05 23:05:18 No: 81853

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

6de74 2004-02-06 00:48:55 No: 81854

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

ねろ 2004-02-06 01:07:04 No: 81855

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 18:26:26 No: 81856

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