Tuşlar Hk.

21/12/2020, 11:37

serkan1985

Herkese merhaba,

Uygulamalarda ctrl ve shift tuşları iptal edilebiliyor ama ben "-" tire tuşunu iptal edemiyorum. Sebebi form içeriğinde ctrl+(-) kullanıldığında veriyi silmesi. Ben silme eylemini sadece buton ile yapmasını istiyorum. Uyguladığım kod aşağıda ki gibi. Nasıl - tuşunu pasif hale getirebilirim? Bilgi ve yardımlarınızı rica ederim.


Select Case True

Case ((Shift And acCtrlMask) > 0 And ((KeyCode = vbKeyF) Or (KeyCode = vbKeyF1) Or (KeyCode = vbKeyF2) Or (KeyCode = vbKeyF3) Or (KeyCode = vbKeyF4) Or (KeyCode = vbKeyF5) Or (KeyCode = vbKeyF6) Or (KeyCode = vbKeyF7) Or (KeyCode = vbKeyF8) Or (KeyCode = vbKeyF9) Or (KeyCode = vbKeyF10) Or (KeyCode = vbKeyF11) Or (KeyCode = vbKeyF12) Or (KeyCode = vbKeyF13)))

        KeyCode = 0
Case ((Shift And acCtrlMask) > 0 And ((KeyCode = vbKeyP) Or (KeyCode = vbKeyS) Or (KeyCode = vbKeyW) Or (KeyCode = vbKeyO) Or (KeyCode = vbKeyN) Or (KeyCode = vbKeyH) Or (KeyCode = vbKeyV)))
        KeyCode = 0

End Select
21/12/2020, 11:56

berduş

vbKeySubtract kodunu kullanmayı denediniz mi?
21/12/2020, 12:12

serkan1985

Evet halen kayıt"ctrl + -" yapınca siliniyor.
21/12/2020, 12:50

berduş

aşağıdaki kodu dener misiniz
If (KeyCode = vbKeySubtract Or KeyCode = 189) And Shift = acCtrlMask Then KeyCode = 0
21/12/2020, 13:04

serkan1985

Merhaba destek ve yardımlarınızı için çok teşekkürler. Aşağıda ki gibi uyguladığımda çözüm olmuştur. Çok teşekkürler.


PHP Kod:
If (KeyCode vbKeySubtract Or KeyCode 189) And Shift acCtrlMask Then
KeyCode 
0
End 
If 
21/12/2020, 13:09

berduş

Rica ederim)
İyi çalışmalar.