Сообщество Чайников

Вопрос

Вопрос такой:
На форме расположено TreeView (TV) и CommandButton (cmdOK) на TV заведена некая древовидная структура с активнами CheckBox'ами. Как по нажатию на cmdOK определить, у каких элементов "галочка" стоит, а у каких — нет.
Если знаешь структуру "дерева" в TV, то можно и перебором, а если ты ее не знаешь, то как?

Ответ

Private Sub cmdOK_Click()
   Dim tNode As Node
   For Each tNode in TV.Nodes
If tNode.Checked Then MsgBox "Node " & tNode.Text & " is checked."
   Next tNode
End Sub

Andrey Shchekin [darXeth]