WPF VB.Net Tutorial

  1. Home
  2. VB.Net Tutorial
  3. WPF
  4. Use Ellipse event delegate
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Title="Code Events" Height="300" Width="300">
  
    
  

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