Ved lukning af database

Jeg har følgende kode som afspilles når databsen lukkes - dog vil jeg gerne have den til ikke at lukke /logge en af hvis man svare nej - HVordan skriver jeg dette ind i denne kode "vbno" = så skal den bare åbne op igen elle bare ikke lukke ned -


Private Sub Form_Unload(Cancel As Integer)
    Dim intSvar As Integer
   
    intSvar = MsgBox("ER du sikker på du vil logge af systemet?", vbQuestion + vbYesNo, "Afslut?")
    If intSvar = vbYes Then
        LoginFunktioner.Logaf
    End If
 
   
 
End Sub