我运行一个VB函数,在函数中我要调用一个form(需要交互)来实现一些功能,想法是等form unload 后,函数再接着运行,因为函数后半部分需要form处理的结果。现在的情况是form load 后,函数就继续执行走了,不等待form产生的结果。
    哪位大虾能帮我出出主意?谢谢!

解决方案 »

  1.   

    看过sub main吗,做一个开关变量,控制程序的运行
      

  2.   

    Public fMainForm As frmselect_inSub Main() Dim fLogin As New frmLogin    fLogin.Show vbModal
        
        If Not fLogin.OK Then
            '登录失败,退出应用程序
            End
        End If
        Unload fLogin    Set fMainForm = New frmselect_in
        Load fMainForm    fMainForm.Show
        
    End Sub
    ----------------------------------------
    以下在窗体中
    Public OK As Boolean
    Private Sub cmdOK_Click()'检查正确用户名及密码
    If ... Then       OK = True
            Me.Hide
       Else
           MsgBox "对不起!你的输入有误,或用户不存在", , "sorry"  End IfEnd Sub
      

  3.   

    bydisplay:
       您好,请问如何改为同步执行?谢谢。
    wynbfqny:
       您好,程序中哪个是开关变量?谢谢。