Looking for a way to lock keyboard.

[Happy New Year]

I have some display systems in my office. I cannot lock the computers in a room yet but untill then I need a way to lock the keyboard and mouse buttons. Not the pointer.


Below is the only thing i have found but only locks for this program. To add to this Debuging can lead to a lot of rebooting? I my be over my head with this.


I tried start:

PublicClass Form1
PublicDeclareFunction apiBlockInput Lib"user32"Alias"BlockInput" (ByVal fBlock AsInteger) AsInteger


PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

apiBlockInput(1)
System.Threading.Thread.Sleep(100000)
apiBlockInput(0)
End
EndSub

PrivateSub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
apiBlockInput(0)
EndSub
EndClass


.