初めまして。
VB2005を使い、プログラムの勉強をしています。
この度エクスプローラを作ろうとして悪戦苦闘しています。
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
TreeView1.Nodes.Add("C")
For Each stFilePath As String In IO.Directory.GetDirectories("C:\")
Dim tempNode As TreeNode
tempNode = TreeView1.Nodes(0).Nodes.Add(stFilePath)
Try
For Each stFilePath2 As String In IO.Directory.GetDirectories(stFilePath)
tempNode.Nodes.Add(stFilePath2)
Next
Catch ex As Exception
End Try
Next stFilePath
End Sub
End Class
の様な状態で孫ノードまで表示することは出来たのですが、ひ孫ノードがどうしてもわかりません。
プログラムを始めて間もないので、初歩的な質問で申し訳ありませんが、ご回答をお願い致します。
「ディレクトリを探して親ノードに追加する」という作業をメソッドにして,それを再帰で呼び出せばよいです。
再帰プログラムを覚えるといいですよ。
親が子ノードを見るプログラム(親)
{
子の数分
親が子ノードを見るプログラム(子)
を呼ぶ
}
解答ありがとうございます。
わからない部分の意味は調べて使ってみようと思います。
ツイート | ![]() |