[Finalizado] Checked do TreeView

Galera,

Eu tenho o seguinte código:

TreeView1.Nodes.Add ,, "pai1", "Nó Pai 1"
TreeView1.Nodes.Add "pai1",tvwchild, "pai1a", "Nó Filho 1 A"
TreeView1.Nodes.Add "pai1",tvwchild, "pai1b", "Nó Filho 1 B"
TreeView1.Nodes.Add "pai1",tvwchild, "pai1c", "Nó Filho 1 C"
TreeView1.Nodes.Add ,, "pai2", "Nó Pai 2"
TreeView1.Nodes.Add "pai2",tvwchild, "pai2a", "Nó Filho 2 A"
TreeView1.Nodes.Add "pai2",tvwchild, "pai2b", "Nó Filho 2 B"
TreeView1.Nodes.Add "pai2",tvwchild, "pai2c", "Nó Filho 2 C"
TreeView1.Nodes.Add ,, "pai3", "Nó Pai 3"
TreeView1.Nodes.Add "pai3",tvwchild, "pai3a", "Nó Filho 3 A"
TreeView1.Nodes.Add "pai3",tvwchild, "pai3b", "Nó Filho 3 B"
TreeView1.Nodes.Add "pai3",tvwchild, "pai3c", "Nó Filho 3 C"
TreeView1.Nodes.Add ,, "pai4", "Nó Pai 4"
TreeView1.Nodes.Add "pai4",tvwchild, "pai4a", "Nó Filho 4 A"
TreeView1.Nodes.Add "pai4",tvwchild, "pai4b", "Nó Filho 4 B"
TreeView1.Nodes.Add "pai4",tvwchild, "pai4c", "Nó Filho 4 C"Como eu faço p/ deixar o "checked" "true"ou "false" do nó pai quando eu seleciono ou tiro a seleção de todos os filhos??