WPF VB.Net

    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Title="WPF" Height="150" Width="300">
    
                        MaxHeight="25" MaxWidth="100" />
                       HorizontalContentAlignment="Center" 
               MaxHeight="25" MaxWidth="100" 
               MouseDoubleClick="Label_MouseDoubleClick" />
        
        
            
                        
        

    


//File:Window.xaml.vb
Imports System
Imports System.Windows
Imports System.Windows.Input
Namespace WpfApplication1
  Public Partial Class Window1
    Inherits Window
    Public Sub New()
      InitializeComponent()
    End Sub
    Private Sub Button_Click(sender As Object, e As RoutedEventArgs)
      MessageBox.Show("Mouse Click", "Button")
    End Sub
    Private Sub Label_MouseDoubleClick(sender As Object, e As MouseButtonEventArgs)
      MessageBox.Show("Mouse Double Click", "Label")
    End Sub
    Private Sub Rectangle_MouseDown(sender As Object, e As MouseButtonEventArgs)
      MessageBox.Show("Mouse Down", "Rectangle")
    End Sub
    Private Sub TextBlock_MouseUp(sender As Object, e As MouseButtonEventArgs)
      MessageBox.Show("Mouse Up", "TextBlock")
    End Sub
  End Class
End Namespace