VB 窗体之间调用控件异常的一种解决方法

1、主要原因是因为：如果你的VB工程是通过向导建立完成的，那么，在新建工程中会自动生成一个模块，如下

Sub Main()

    Dim fLogin As New frmLogin   

    fLogin.Show vbModal

    If Not fLogin.OK Then

        '登录失败，退出应用程序

        End

    End If

    Unload fLogin

‘以上是登陆对话框的相关代码，这不是重点

   Set fMainForm = New frmMain 

    fMainForm.Show             ’注意，这里就是问题的所在，它重新建立了一                                                           个新的FrmMain，就是这两行代码让我们无法                                                              正确的调用控件

End Sub

2、解决方法：

Sub Main()

    Dim fLogin As New frmLogin   

    fLogin.Show vbModal

    If Not fLogin.OK Then

        '登录失败，退出应用程序

        End

    End If

    Unload fLogin

‘以上是登陆对话框的相关代码，这不是重点

   frmmain.Show             ’直接换成这个代码。OK，现在可以正常的操作控件了。

End Sub