Alt+F4 tuş kullanımını denetleme

[Aleko]

Merhaba, forumda aradım ama bulamadım veya bulmayı beceremedim. Formun denetimsiz kapanmasını önlemek için Alt+F4 veya Ctrl+F4 tuş bileşenlerini etkisiz hale getirmenin bir yolu var mı acaba? Yabancı forumlarda bulduğum VB kod örneklerini Access'te çalıştıramadım. Yardımcı olursanız sevinirim. Selamlar.

 

[Aleko]

Alt+F4 tuşunu denetleme

Merhaba, forumda aradım ama bulamadım veya bulmayı beceremedim. Formun denetimsiz kapanmasını önlemek için Alt+F4 veya Ctrl+F4 tuş bileşenlerini etkisiz hale getirmenin bir yolu var mı acaba? Yabancı forumlarda bulduğum VB kod örneklerini Access'te çalıştıramadım. Yardımcı olursanız sevinirim. Selamlar.

Herhalde ihtiyaç duyulmuyor. Sorum yanıtsız kaldı.
Cevabı buldum, paylaşmak istedim. Her formun kod sayfasına aşağıdaki satırlar yazılıyor. Önelikle form özelliklerinden Tuş Önizleme 'Evet' olarak seçilmeli. Yalnız rapor önizleme görünümünde çalışmıyor. Sanırım tuş denetimi olmadığı için. Selamlar.

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If (KeyCode = vbKeyF4 And (Shift And acAltMask) = acAltMask) Then
KeyCode = 0
MsgBox "HATALI ÇIKIŞ YAPIYORSUNUZ!"
Exit Sub
End If
End Sub