Button mouse down event : Button Event « Windows Presentation Foundation « VB.Net Tutorial

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

<Window
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    x:Class="WpfApplication1.Window1"
    Title="Routed Events" Height="400" Width="800">
  
    <Grid Name="contentGrid" Background="Red">
        <Rectangle Name="clickMeRectangle" 
                   Height="70" 
                   Width="70" 
                   Stroke="Black" 
                   Fill="CadetBlue" />
        <Button Name="clickMeButton" 
                Height="23" 
                HorizontalAlignment="Right" 
                VerticalAlignment="Top" 
                Width="70" 
                MouseDown="Generic_MouseDown" 
                PreviewMouseDown="Generic_MouseDown" 
                Click="clickMeButton_Click">Click Me</Button>
        <TextBlock Name="outputText" />
    </Grid>
</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

Namespace WpfApplication1
  Public Partial Class Window1
    Inherits Window
    Private Sub Generic_MouseDown(sender As Object, e As MouseButtonEventArgs)
      Console.WriteLine(outputText.Text)
      Console.WriteLine(e.RoutedEvent.Name)
      Console.WriteLine(sender.ToString())
      Console.WriteLine(DirectCast(e.Source, FrameworkElement).Name)
    End Sub

    Private Sub Window_MouseUp(sender As Object, e As MouseButtonEventArgs)
      outputText.Text = outputText.Text
    End Sub

    Private Sub clickMeButton_Click(sender As Object, e As RoutedEventArgs)
      outputText.Text = "Button clicked:" + outputText.Text
    End Sub
  End Class
End Namespace

16.7.Button Event
	16.7.1.	Button Click event handler
	16.7.2.	Button mouse down event
	16.7.3.	Button mouse down preview
	16.7.4.	Raise exception from button click event
	16.7.5.	Button click action
	16.7.6.	Generate Click Events Repeatedly While a Button Is Clicked