ツリービューで指定したノードを展開表示するには?

タグの編集
投稿者 yama  () 投稿日時 2008/8/26 00:33:00
お世話になっております。 
 
VB2008EXPでTreeViewコントロールを使ってノードを表示しようとしています。 
ツリー構造は、親→子→孫→ひ孫までの構造です。 
フォームを表示したら、初期表示として[孫]ノードまで展開した状態で表示したいのですが、何方かご教授をお願い致します。 
[プログラム記述] 
Dim RootNode As New TreeNode            '親ノード 
Dim ChildNode As New TreeNode           '子ノード 
Dim GrandChildNode As New TreeNode      '孫ノード 
Dim GreatGrandChildNode As New TreeNode 'ひ孫ノード 
    TreeView1.Nodes.Clear() 
    RootNode = New TreeNode() 
    RootNode.Text = "商品" 
    TreeView1.Nodes.Add(RootNode) '親ノード追加 
    '子ノードを追加(省略) 
    '孫ノードを追加(省略) 
    'ひ孫ノードを追加(省略) 
これを実行しますと、親ノードが表示され、+をクリックして展開しています。孫ノードやひ孫ノードまで展開した状態で表示したいのですが!!
投稿者 魔界の仮面弁士  () 投稿日時 2008/8/26 01:01:00
展開したいノードの Expand / ExpandAll メソッドを呼び出せば OK です。
投稿者 yama  () 投稿日時 2008/8/26 01:24:00
魔界の仮面弁士さん 回答有難う御座います。 
 
TreeView1.Nodes.Add(RootNode) '親ノード追加  
'子ノードを追加(省略)  
'孫ノードを追加(省略)  
'ひ孫ノードを追加(省略)  
 
でノードを追加した後、RootNode.Expand()を追加して実行したら、 
 +商品 
  +子ノード 
で展開出来ました。 
有難う御座います。 
今後とも宜しくお願い致します。