//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