ต้องการห้ามกดปุ่ม Page Up / Page Down ครับ

[ekppom]

เรียนท่านอาจารย์ครับ ผมมีปัญหาทางเทคนิคเกี่ยวกับโปรแกรมของผม ที่ห้ามกดปุ่มPage Down เป็นอันขาด แต่บางครั้งผู้ใช้กลับเผลอไปกดมันในขณะคีย์ตัวเลขแบบรีบๆ พอจะมีวิธีตัดไม่ให้โปรแกรมรับคำสั่งปุ่มPage Up / Page Downได้หรีือไม่ครับ

[OddyWriter]

ที่ Event: On Key Down ให้ใส่ Code นี้เข้าไปครับ

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
 
    Select Case KeyCode
        Case 33, 34
        KeyCode = 0
    End Select
End Sub

แล้วกำหนด Key Preview = True

[ekppom]

ขอบคุณมากนะครับ