private sub gcheckchildrenbyself(treeview1 as treeview,byval curindex as integer,byval bch as integer)
  dim n as integer
if treeview1.nodes(curindex).children<=0 then
 exit sub
end if
else
   n=treeview1.nodes(curindex).child.index
  do while n<>treeview.nodes(curindex).child.lastsibling.index
  treeview1.nodes(n).checked=bch
  n=treeview1.nodes(n).next.index
loop
  treeview1.nodes(n).checked=bch
  gcheckchildrenbyself treeview,n,bch
end if
end sub

我想问下 treeview1.nodes(n).checked=bch
  n=treeview1.nodes(n).next.index是什么意思？treeview1.nodes(n).checked返回的部应该是布尔值么？前面怎么定义为integer型，这个是什么意思？