主题：先进入界面，再检查更新。。。

各位老师好，我在用户登录的界面  登录 按钮 写如下代码:

(想实现 进入 界面 之后 才检查版本新旧，但是发现，点 登录 按钮后，没有先出来界面，还是先执行了检查版本新旧的代码。。。。)

If e.Form.Controls("PassWord").Value = dr("登录密码") Then

    Forms("界面窗口").show
    Forms("我的导航").show
    e.Form.Close

    '检查版本新旧----------------------------------------

    Application.DoEvents()   用了这个暂停下面的代码，让上面的Forms("界面窗口").show先执行，也是没有效果。

    forms("检查更新").Open
    
    '定义变量--------------------
    Dim ename As String = "软件.exe" '管理系统运行文件名
....
    
    Dim ftp As New FTPClient
    ftp.Host = 
    ftp.Account = 
    ftp.Password = 
    ftp.Port = "21"
    ftp.RootDir = "\fox\ty\Update" '如果升级所需文件刚好放置在FTP的根目录下,可以不用设置此属性;否则需要设置目录路径.
 
    
    Dim zip As New ZipFile
   
    '连接FTP服务器--------------------
    If ftp.Connected = False '如果FTP没有连接
        If ftp.Connect Then '连接FTP
            '     MessageBox.Show("FTP服务器连接成功!")
        Else
            forms("进入窗口").close
            MessageBox.Show("FTP服务器连接失败!")
           
            Return
        End If
    End If

不知道怎样才能实现：先进入 界面 之后 再检查版本新旧