Private Sub Kapat_BTN_Click()
If MsgBox("Ayni Yardım Çıkış Formu Kapanacak, Eminmisiniz.?", vbQuestion + vbYesNo, "Dikkat...!") = vbYes Then
DoCmd.Close acForm, "F_AyniYardimCikis"
End If
If CurrentProject.AllForms("F_AyniYardimCikanListesi").IsLoaded = True Then
DoCmd.Close acForm, "F_AnaForm"
Else
DoCmd.OpenForm "F_AnaForm"
End If
End Sub
Ozan Bey alttaki kodu da kapat butonuna yazdım Anaformun kapanıp açılması olayınıda düzenlemiş oldum böylece çok teşekkür ederim.
Access Çekirgesi