关于循环的一个问题？

dim x as controlfor each x in me.controls
    
next

解决方案 »

  1.   

    就是吧，楼上的说的对
    只要改成Check(1)--Check(200)就好了
      

  2.   

    dim x as controlfor each x in me.controls
      
    next
      

  3.   

    可是我那200个控件给做好了！
    取名就是check1-check200！
    怎么办呀
    for i=1 to 200
     form1.check(i).value'i是变量
    next
    最好能实现这样子！！vb中要这样子的话，应该怎么办呀
      

  4.   

    dim x as controlfor each x in me.controls
        if left(x.name,5)="check" then
             '处理
         
        end if
    next
      

  5.   

    不过我一般用ck开头来命名Check，呵呵
      

  6.   

    我是想让数据库里有值的，在其应的check赋1(变为check状态)。
    其数据库里的编号，也是一样的。从1-200呀！！！！
      

  7.   

    使用controls集合并使用名称访问控件
    for i=1 to 200
        form1.controls("check" & i).value=rst.fields(i)
    next