Mega Code Archive

 

Categories / VB.Net / WPF

 

Set a Default Button

<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="100" Width="300">     <DockPanel>         <TextBox DockPanel.Dock="Top" Margin="5">Button three is the default button.</TextBox>         <StackPanel HorizontalAlignment="Center" DockPanel.Dock="Bottom" Orientation="Horizontal">             <Button Click="SharedButtonClickHandler" Content="Button One" Name="btnOne" Width="75" />             <Button Click="SharedButtonClickHandler" Content="Button Two" Name="btnTwo" Width="75" />             <Button Click="SharedButtonClickHandler" Content="Button Three" IsDefault="True" Margin="5" Name="btnThree" />         </StackPanel>     </DockPanel> </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