Mega Code Archive

 

Categories / VB.Net / WPF

 

Do event based on button name

<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="150" Width="250">     <StackPanel>         <StackPanel>             <StackPanel.Resources>                 <Style TargetType="{x:Type Button}">                     <Setter Property="Margin" Value="2" />                                             <EventSetter Event="Click" Handler="btnShowPopup_Click" />                 </Style>             </StackPanel.Resources>             <Button Content="Show Popup" Name="btnShowPopup" />             <Button Content="Fade Popup" Name="btnFadePopup" />             <Button Content="Scroll Popup" Name="btnScrollPopup" />             <Button Content="Slide Popup" Name="btnSlidePopup" />         </StackPanel>     </StackPanel> </Window> //File:Window.xaml.vb Imports System Imports System.Collections.Generic Imports System.Linq 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.Navigation Imports System.Windows.Shapes Imports System.Windows.Controls.Primitives Namespace WpfApplication1   Public Partial Class Window1     Inherits Window     Public Sub New()       InitializeComponent()     End Sub     Private Sub btnShowPopup_Click(sender As Object, e As RoutedEventArgs)       If sender Is btnFadePopup Then         Console.WriteLine("fade")       ElseIf sender Is btnScrollPopup Then         Console.WriteLine("scroll")       ElseIf sender Is btnSlidePopup Then         Console.WriteLine("slide")       Else         Console.WriteLine("else")       End If     End Sub   End Class End Namespace