kopyala yapıştır yaparken hatalı eklemeden dolayı bir yazım yanlışı söz konusu olmuştur.bundan dolayı özür dilerim bu arada.
ilgili kodu aşağıdaki ile değiştiriniz lütfen.
Kod:
If MsgBox("STS ile çalışmanız sona erecektir." & Chr(13) & "Onaylıyor musunuz?", vbYesNo + vbCritical, "deneme") = vbYes Then DoCmd.Quit