<Window x:Class="WpfApplication1.Window1"
xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
Title="WPF" Height="200" Width="200">
<StackPanel>
<Button Click="SharedButtonClickHandler" Height="23" Margin="10"
Name="button1" Width="75">Button One</Button>
<Button Click="SharedButtonClickHandler" Height="23" Margin="10"
Name="button2" Width="75">Button Two</Button>
<Button Click="SharedButtonClickHandler" Height="23" Margin="10"
Name="button3" Width="75">Button Three</Button>
</StackPanel>
</Window>
//File:Window.xaml.vb
Imports System.Windows
Imports System.Windows.Controls
Namespace WpfApplication1
Public Partial Class Window1
Inherits Window
Public Sub New()
InitializeComponent()
End Sub
Private Sub SharedButtonClickHandler(sender As Object, e As RoutedEventArgs)
Dim source As Button = TryCast(e.OriginalSource, Button)
If source IsNot Nothing Then
MessageBox.Show("You pressed " & source.Name, Title)
End If
End Sub
End Class
End Namespace
|
