xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" Title="TunneledKeyPress" Height="400" Width="400" PreviewKeyDown="SomeKeyPressed" > PreviewKeyDown="SomeKeyPressed"> Image and text label
Type here:
Handle first event
//File:Window.xaml.vb Imports System Imports System.Collections.Generic Imports System.Text Imports System.Windows Imports System.Windows.Controls Imports System.Windows.Data Imports System.Windows.Documents Imports System.Windows.Input Imports System.Windows.Media Imports System.Windows.Media.Imaging Imports System.Windows.Shapes Namespace RoutedEvents Public Partial Class TunneledKeyPress Inherits System.Windows.Window Public Sub New() InitializeComponent() End Sub Protected eventCounter As Integer = 0 Private Sub SomeKeyPressed(sender As Object, e As RoutedEventArgs) eventCounter += 1 Dim message As String = "#" & eventCounter.ToString() & ":" & vbCr & vbLf & " Sender: " & sender.ToString() & vbCr & vbLf & " Source: " & Convert.ToString(e.Source) & vbCr & vbLf & " Original Source: " & Convert.ToString(e.OriginalSource) & vbCr & vbLf & " Event: " & Convert.ToString(e.RoutedEvent) lstMessages.Items.Add(message) e.Handled = CBool(chkHandle.IsChecked) End Sub Private Sub cmdClear_Click(sender As Object, e As RoutedEventArgs) eventCounter = 0 lstMessages.Items.Clear() End Sub End Class End Namespace