Mega Code Archive

 
Categories / VB.Net Tutorial / WPF
 

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