検出シフト/キャップがロックした場合は、上にある

Question

可能性の重複：

Dim capsLock As Boolean = GetCapsLockState() 'imaginary function 
Dim shiftKey As Boolean = GetShiftKeyState() 'imaginary function 

できる人：私は、キー入力に関連する2つの関数を作成したいのです
How do I get the current state of Caps Lock in VB.NET?

これらの機能を手伝ってください...

ありがとう

Answer 1

.NET 2.0以降を使用している場合は、メソッドを使用できます。

Imports System 
Imports System.Windows.Forms 
Imports Microsoft.VisualBasic 

Public Class CapsLockIndicator 

    Public Shared Sub Main() 
     If Control.IsKeyLocked(Keys.CapsLock) Then 
      MessageBox.Show("The Caps Lock key is ON.") 
     Else 
      MessageBox.Show("The Caps Lock key is OFF.") 
     End If 
    End Sub 'Main 

End Class 'CapsLockIndicator