For Each MyNod In TreeView1.Nodes
 '一些判断语句  
   Set MyNod = TreeView1.Nodes.Add("" + MyNod.Key + "", tvwChild, "" +  "" & "TWO" & i, "" + RS!TWO + "")
       
   TreeView1.Refresh
Next在For 循环中,我增加了节点后,循环不能再继续,出现"控件的集合已经被更改"的错误,怎样做才能使循环继续下去??

解决方案 »

  1.   

    加on error resume next不过要保证你的判断条件可以跳出循环
      

  2.   

    不知道你这样加的意,但是这样应该不对,试试看下面的方法。
    for i = 1 to treeview1.nodes.count
         
       Set MyNod = TreeView1.Nodes(i).Add("" + TreeView1.Nodes(i).key+ "", tvwChild, "" +  "" & "RS!TWO" & i, "" + RS!TWO + "")
                          
    next
      

  3.   

    不知道你为什么要这样做,效率低,如果你的判断是在NODES中找是否有符合条件的,可以用set nNode=treeview.nodes(key)来定位,这样效率更高,善用Key这个关键字能够帮你处理很多问题的。
    我的MSN:[email protected]