Get event sender from event : Event « Windows Presentation Foundation « VB.Net

1. VB.Net
2. Windows Presentation Foundation
3. Event

Get event sender from event

    
<Grid xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" 
  xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" 
  xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
  xmlns:d="http://schemas.microsoft.com/expression/interactivedesigner/2006"
  mc:Ignorable="d" Background="#FFFFFFFF" x:Name="DocumentRoot"
  x:Class="InputExamples.EventHandling" Width="640" Height="480">
  <Grid.Resources>
    <Storyboard x:Key="OnLoaded"/>
  </Grid.Resources>
  
  <Grid.ColumnDefinitions>
    <ColumnDefinition/>
  </Grid.ColumnDefinitions>
  <Grid.RowDefinitions>
  <RowDefinition/>
  </Grid.RowDefinitions>
  <Button HorizontalAlignment="Left" 
          VerticalAlignment="Top" 
          Width="106" 
          Height="28" 
          x:Name="ClickButton1" 
          Content="Click Me!" 
          Click="ClickHandler" PreviewMouseUp="ButtonMouseUpHandler"/>
  <Button d:LayoutOverrides="Width, Height" 
          HorizontalAlignment="Left" 
          VerticalAlignment="Top" 
          Margin="20" 
          Width="106" 
          Height="28" 
          x:Name="ClickButton2" 
          Content="Click Me!" 
          Click="ClickHandler" 
          PreviewMouseUp="ButtonMouseUpHandler"/>
</Grid>

//File:Window.xaml.vb
Imports System
Imports System.IO
Imports System.Net
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Data
Imports System.Windows.Input
Imports System.Windows.Media
Imports System.Windows.Media.Animation
Imports System.Windows.Navigation

Namespace InputExamples
  Public Partial Class EventHandling
    Public Sub New()
      Me.InitializeComponent()
    End Sub

    Private Sub ClickHandler(sender As Object, e As RoutedEventArgs)
      Dim clicked As Button = TryCast(e.Source, Button)
      MessageBox.Show([String].Format("{0} was clicked!", clicked.Name))
    End Sub

    Private Sub ButtonMouseUpHandler(sender As Object, e As MouseButtonEventArgs)
      Dim clicked As Button = TryCast(sender, Button)
      clicked.Content = [String].Format("{0} clicked", clicked.Name)
    End Sub
  End Class
End Namespace

   
    
    
    
  

Related examples in the same category

1.	Handle the ContentRendered event
2.	Find source element of an element in event handler by casting
3.	Add an event handler to an element using code
4.	Halting event routing with Handled
5.	Security Exception
6.	Throw Handled Exception
7.	Check handler event sender
8.	Do event based on button name
9.	Add event handler to StackPanel in StackPanel resource
10.	Add a PropertyChangedValueCallback to Any Dependency Property
11.	Handle a Button Click with Shared button click handler
12.	DispatcherTimer and EventHandler
13.	Thumb DragStarted and DragCompleted event handler
14.	Set interval and event handler for DispatcherTimer
15.	Get the event sender name
16.	Event firing sequence
17.	Cancel event by setting CanExecute and Handled to false
18.	Event sender, event source and event original source
19.	Cast event sender to a control
20.	Fire an event when an element gains and loses focus.