WPF VB.Net

    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Title="AddHandler" Height="300" Width="300">
  
    
      
        
          
          
        

        
                             Fill="Yellow" Stroke="Black" />
        
      
    
  

//File:Window.xaml.vb
Imports System
Imports System.Windows
Imports System.Diagnostics
Imports System.Windows.Shapes
Imports System.Windows.Input
Namespace WpfApplication1
  Public Partial Class Window1
    Inherits System.Windows.Window
    Public Sub New()
      InitializeComponent()
    End Sub
    Private Sub PreviewMouseDownButton(sender As Object, e As RoutedEventArgs)
      Debug.WriteLine("PreviewMouseDownButton")
    End Sub
    Private Sub MouseDownButton(sender As Object, e As RoutedEventArgs)
      Debug.WriteLine("MouseDownButton")
    End Sub
  End Class
End Namespace