LOCK THE KEYBOARD

[COSIDUS]

Hi,

I'd like to lock the keyboard in order to prevent the user to do certain anything in a form.
If someone can help me...

Thank you

COSIDUS

How about:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    KeyCode = 0
End Sub

Private Sub Form_Load()
    Form1.KeyPreview = True
End Sub

This sample it pretty limited (only keypress on the form), but you can do the same thing for any other control thats on your form.

Private Sub Text1_KeyPress(KeyAscii As Integer)
    KeyAscii = 0
End Sub

Sunny

Try:

Shell "rundll32 keyboard,disable"

[parabolic]

is something similar also possible with a mousebutton? i included a flash4 movie into the vb6 app and i want to lock the right mouse click because the annoying ugly grey popup menu ruins my design...