即使声明关闭，Windows窗体也会不断弹出

Question

我目前正在开发一个带登录表单的通用文档跟踪系统。我在后端使用Access 2013数据库来存储凭据。所有的作品，似乎都很好，直到发生这种情况

代码：

Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click
    Dim login = Me.UsersPasswordsTableAdapter.UsernamePasswordString(txtUsername.Text, txtPass.Text)

    If login Is Nothing Then
        MsgBox("Authentication Error! Please Try Again!", "MARINA XI" & vbCritical)
    Else
        MessageBox.Show("User " & txtUsername.Text & " verified" & vbNewLine & "Welcome!", "MARINA XI", MessageBoxButtons.OK, MessageBoxIcon.Information)
        frm_CUSTOMER_INTERFACE.lblAdmin.Text = CStr(txtUsername.Text)
        frm_CUSTOMER_INTERFACE.Show()
        Me.Close()
    End If
End Sub

没有检测到任何错误或其他恶意内容，我不知道为什么这个小的登录表单会在上述代码关闭时突然弹出。

哦，顺便说一下，我有这样的启动画面，时间为8.5秒，直到登录表单出现并关闭此启动画面

Splash screen

它的代码是ff：

Private Sub LoadOutClk_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LoadOutClk.Tick
    If LoadOutClk.Interval = 8500 Then
        Me.Hide()
        frm_ADMIN_LOGIN.Show()

    End If
End Sub

登录表单的代码张贴在上面..