急等：關(guān)閉主窗體時(shí)提示，找不到登陸窗體

snryga

登陸后隱藏的登陸窗體：
        Forms![登陸].Visible = False   '登陸后隱藏登陸窗體
        DoCmd.SelectObject acForm, "登陸", True

通過(guò)主窗上的“X”關(guān)閉時(shí)始終提示找不到登陸窗體，報(bào)錯(cuò)2450
Private Sub Form_Unload(Cancel As Integer)   
On Error Resume Next
  Dim ASC
     ASC = MsgBox("確定要退出系統(tǒng)嗎？", vbQuestion + vbYesNo, "SQL server")
         If ASC = vbYes Then
            DoCmd.Quit acQuitSaveNone  
         ElseIf ASC = vbNo Then
           Cancel = True
         End If
End Sub

請(qǐng)問(wèn)下是哪里的問(wèn)題呢?我試著用關(guān)閉前先顯示隱藏的登陸窗體，但仍報(bào)錯(cuò)。

admin

傳附件吧，這個(gè)邏輯不太對(duì)。關(guān)閉主窗體跟登錄窗體是什么關(guān)系？

snryga

謝謝admin，搞定了。在窗體中加載事項(xiàng)中引用了登陸名稱，取消就行了。