我在一个窗体frmLogin中定义了一个public flag as boolean 
而在frmUser 中需要用到它的值,为何调试为NULL值啊,而在frmLohin中已经赋值为true了。
应该如何传递呢

解决方案 »

  1.   

        if frmLogin.flag then
            msgbox "ok"
        end if
      

  2.   


    '第一个窗体的代码
    Option Explicit
    Public flag As BooleanPrivate Sub Form_Load()
        flag = True
        Form2.Show
    End Sub
    '第二个窗体代码
    Option ExplicitPrivate Sub Form_Load()
        If Form1.flag = True Then  'flag确实是true
            Text1.Text = "1111"
        End If
    End Sub
    '上面的代码值传过来了
    '你对照自己的代码看一下
      

  3.   

    首先要定义成窗体变量,如果该窗体时new 打开的,且该变量是从其他地方赋值的,也要在new后面紧接着赋值。
    如 dim frm as new form1
    frm.m_str_id="1234"
    frm.flag =true
    frm.show 1