For Each Frm In Forms
    if Frm.Name = "Form2" then
        From.Controls("text1").text="abc" 
    end if
 Next

解决方案 »

  1.   

    Form2.Controls("text1").text="abc" 
    这个Form2 可以动态变动吗?
    类似Forms("form2").Controls("text1").text="abc" 
    这样的. 我查了一下 Forms 后面只能加数值参数index, 怎么查自己窗口的index ?
    其实我是想弹个新窗口做个类似inputbox的但复杂一点功能.
      

  2.   

    For i = 0 to Forms.count - 1
        if Forms(i) = Me then
            Msgbox i
        end if
     Next
      

  3.   

    做类似 InputBox 的对话框参考这个帖子