[비주얼베이직] 키보드, 마우스 잠그기

비베를 실행시켜주세요

일반을 눌러주세요

Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long 을 선언해주세요

실행시키자마자 마우스를 잠그려면 폼로드에 BlockInput True 입력하세요

커맨드를 눌렀을때 마우스를 잠그려면 커맨드에  BlockInput True  입력하시오



예)
Private Sub Form_Load()
BlockInput True
End Sub