Potvrzenφ ukonΦenφ aplikace
Postup:
Na udßlost Form_QueryUnload zapiÜte:
Private Sub
Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Dim Answer As Integer
Answer = MsgBox("Opravdu si p°ejete ukonΦit aplikaci
?", _
vbQuestion + vbYesNo, "Potvrzenφ")
If Answer = vbNo Then Cancel = True
End Sub
Tady bych doporuΦoval podφvat se na parametr UnloadMode, kter² vracφ ukonΦovacφ k≤d. Asi by stßlo za to oÜet°it, jestli Vßm aplikaci necht∞jφ ust°elit Windows, kdy₧ konΦej. Pak u₧ asi nemß smysl se ptßt na potvrzenφ.