专家坐堂-登录成功后登录窗口关闭还有边框显示怎么解决哦（已解决谢谢版主）Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim UserName As String = e.Form.Controls("TextBox1").Value
Dim dr As DataRow
If UserName = "" Then
      MessageBox.Show("请输入用户账号!!!!","错误提示",MessageBoxButtons.OKCancel,MessageBoxIcon.Error)
End If
dr = _UserTable.SQLFind("用户账号 = \'" & UserName & "\'")
If  dr Is Nothing  Then
     Messagebox.show("此用户不存在!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Return

End If
If e.Form.Controls("TextBox2").Value = dr("用户密码") Then
    _UserName = UserName
    _UserGroup = dr("用户组别")
    _UserXm = dr("用户姓名")
   \' MessageBox.Show("用户登录成功!!!!!!!!!!!","提示",MessageBoxButtons.OKCancel,MessageBoxIcon.Question)
    e.Form.Close()
    Forms("主窗口").open
Else
    Messagebox.show("密码错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If