Søg
Avatar billede tigerdyr2007 Praktikant
14. september 2010 - 18:11 Der er 7 kommentarer og
1 løsning

Fortryde lukning

I en formular har jeg noget kode liggende i OnClose, hvis nu en bestemt betingelse opfyldes kan jeg så fortryde lukke kommandaoen, ala:

Private Sub Form_Close()
  If 10 = 10 then
    "fortyd lukning"
  End If
End Sub
Avatar billede neoman Novice
14. september 2010 - 18:18 #1
Ikke On Close, men On Unload kan du fortryde.

http://bytes.com/topic/access/answers/570283-canceling-forms-close-event-stopping-form-closing
Avatar billede tigerdyr2007 Praktikant
14. september 2010 - 19:04 #2
OK, men de er ikke lige behjælpelige med en linie kode til at gøre det med, så er kun kommet lidt videre.
Avatar billede neoman Novice
14. september 2010 - 19:11 #3
Private Sub Form_Unload(Cancel As Integer)
    If MsgBox("Close form?", vbYesNo) = vbYes Then
        Exit Sub
    Else
        Cancel = True
    End If
End Sub
Avatar billede neoman Novice
14. september 2010 - 19:20 #4
Ovenstående er angivet i Access hjælp og kommer frem ved at søge på Unload.  Dokumentationen for Access er faktisk ikke helt tosset.
Avatar billede tigerdyr2007 Praktikant
14. september 2010 - 20:39 #5
SUper, det virker. Smid et svar
Avatar billede neoman Novice
14. september 2010 - 20:42 #6
oki
Avatar billede mugs Novice
14. september 2010 - 22:12 #7
Kan man ikke bruge exit sub:

Private Sub Form_Close()
  If 10 = 10 then
  Me.undo
  exit sub
  End If
End Sub

Ikke afprøvet, blot en strøtanke.
Avatar billede tigerdyr2007 Praktikant
15. september 2010 - 09:12 #8
@Mugs god ide, virker bare ikke...
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Access kurser
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser
Se alle Access kurser

Flere spørgsmål fra Access kategorien

Titel Indlæg Oprettet Seneste aktivitet
Access database udskriver ikke rammer korrekt Af Uvanga i Access 8 18/11/202500:24 18/11/202510:25
Menu linie forsvundet i editoren Af per2edb i Access 10 13/11/202515:30 18/11/202518:09
Tekst format i Kodevinduet Af per2edb i Access 11 02/11/202517:28 04/11/202516:08
Tabstop, vba Af zuschlag i Access 8 05/10/202513:34 08/10/202512:48
Fejl i Dato = Format(Now(), "dd-mm-yyyy hh:mm:ss") Af per2edb i Access 6 26/09/202513:37 07/11/202507:47
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
27/1222:02 Låse brugt iPad op Af drstein i iOS, iPhone & iPad
27/1219:21 Hvor finder jeg en oversigt over mine spørgsmål Af KurtG i Hjælp og fejl
27/1211:31 TP-Link Wifi extender opsat som accesspoint giver 50% up- og download, Af Uvanga i Wifi
26/1213:05 Hvorfor bliver tiff-filer større ved konvertering til samme format Af KurtG i Billedbehandling
23/1221:36 Gøre Ikonerne lidt større i proceslinjen (Windows 10) Af Ikke-ekspert i Windows
White papers
Flere white papers »