Skip to main content

AccessTr.neT


Klavye Kısayolları

Klavye Kısayolları

#2
Bunun mümkün olmadığını nerede gördünüz bilmiyorum ama aşağıdaki ctrl+s engelleme kodu diğer tüm CTRL + tuş kombinasyonlarını önlemenizde işinize yarar.

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

  'Ctrl+S engelleme
    If KeyCode = 83 And Shift = acCtrlMask Then

    'Sadece Ctrl Engelleme
    'If Shift = acCtrlMask Then
    MsgBox "Ctrl + S devredışı bırakılmıştır", vbInformation
    KeyCode = 0
    End If
    End Sub

    Private Sub Form_Load()
    KeyPreview = True
    End Sub

koddaki keykode=83 "S" harfinin değeridir acCtrlMask CTRL tuşunu ifade eder. Siz kopyalama için "C"' yi engelleyecekseniz keycode=67, kesme için "X"  keycode=88, yapıştırma için "V" keycode=86 olarak kodlara uyarlayabilir ve kopyala/kes/yapıştır kısayollarını engellemiş olursunuz.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Klavye Kısayolları - Yazar: aydin5353 - 31/10/2022, 21:47
RE: Klavye Kısayolları - Yazar: atoykan - 01/11/2022, 19:24
RE: Klavye Kısayolları - Yazar: aydin5353 - 01/11/2022, 23:22
RE: Klavye Kısayolları - Yazar: atoykan - 02/11/2022, 03:13