TreeViewのChild Node

任意のNodeのChild Nodeの 一覧を取得したいのですが、
これはどこでというかどうやると取得できるのでしょうか？


よろしくお願いします。

VB6+Windows2000です。

No.1 ベストアンサー 回答者： kakusuke 回答日時： 2004/12/12 01:40

再帰呼出を使って取得する方法が普通です。

例えば、

'Dim intNodesCount As Integer
'Dim nodChildren() As Node
'
'Sub GetAllNodeChildren(ByVal nodSetNode As Node)
' intNodesCount = 0
' Erase nodChildren
' Call GetNodeChildren(nodSetNode)
'End Sub
'Sub GetNodeChildren(ByVal ParentNode As Node)
'Dim nodX As Node
' For Each nodX In TreeView1.Nodes
' If nodX.Parent Is ParentNode Then
' intNodesCount = intNodesCount + 1
' ReDim Preserve nodChildren(1 To intNodesCount)
' Set nodChildren(intNodesCount) = nodX
' Call GetNodeChildren(nodX)
' End If
' Next
'End Sub
こんな感じでどうでしょう？

この回答へのお礼

なるほど。

まずは全ノードをチェックしてしまうわけだったんですねぇ。

ありがとうございました。

お礼日時：2004/12/12 10:31