WPF VB.Net

  1. Home
  2. VB.Net
  3. WPF
  4. Query Number lock key
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Title="WPF" Height="170" Width="200">
    
        
            
                
                    
                    
                
            
        
        
    

//File:Window.xaml.vb
Imports System
Imports System.Windows
Imports System.Windows.Input
Namespace WpfApplication1
  Public Partial Class Window1
    Inherits Window
    Public Sub New()
      InitializeComponent()
      CheckKeyboardState()
    End Sub
    Private Sub Button_Click(sender As Object, e As RoutedEventArgs)
      CheckKeyboardState()
    End Sub
    Private Sub CheckKeyboardState()
      Console.WriteLine(Keyboard.IsKeyToggled(Key.NumLock))
    End Sub
  End Class
End Namespace