Block Mouse and keyboard
Block Mouse and keyboard
Rate Block Mouse and keyboard
(2(2 Vote))
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Form_Activate()
DoEvents
'block the mouse and keyboard input
BlockInput True
'wait 10 seconds before unblocking it
Sleep 10000
'unblock the mouse and keyboard input
BlockInput False
End Sub
Block Mouse and keyboard Comments
No comments yet — be the first to post one!
Post a Comment