Just nu i M3-nätverket
Jump to content

Avsluta databas VBA


Martassen

Recommended Posts

Tänkte skapa en knapp i ett formulär för att Avsluta databas.
 

DoCmd.Quit acQuitSaveAll

Hur gör jag om jag vill få fram ett dialogruta med alternativen Ok och avbryt.
Klickar man Ok ska databas avslutas. Trycker man Avbryt avslutas den ej.

 

 

Fråga2:
Hur gör jag samma sak fast med ruta med alternativen "ja" och "nej".
Trycker man ja så avslutas databasen. Trycker man Nej avslutas inte databasen.

 

Tack på förhand!

Link to comment
Share on other sites

Mr Andersson

För ja/nej:

if msgbox("Avsluta?",  vbYesNo) = vbYes then
.....
end if

För ok/Cancel

if msgbox("Avsluta?",  vbOKCancel) = vbOK then
.....
end if
Link to comment
Share on other sites

Är usel i VBA. Ok med följande alltså?


Private Sub Kommandoknapp21_Click()
If MsgBox("Avsluta?", vbOKCancel) = vbOK Then
DoCmd.Quit acQuitSaveAll
End If
End Sub


Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...