Routed Event Demo
<Window xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" x:Class="WpfApplication1.RoutedEventDemo.RoutedEventDemo" Title="Routed Event Demo"> <TextBlock Name="txtblk">TextBlock with Context Menu <TextBlock.ContextMenu> <ContextMenu MenuItem.Click="MenuItemOnClick"> <MenuItem Header="Red" /> <MenuItem Header="Orange" /> <MenuItem Header="Yellow" /> <MenuItem Header="Green" /> <MenuItem Header="Blue" /> <MenuItem Header="Indigo" /> <MenuItem Header="Violet" /> </ContextMenu> </TextBlock.ContextMenu> </TextBlock> </Window> //File:Window.xaml.vb Imports System Imports System.Windows Imports System.Windows.Controls Imports System.Windows.Input Imports System.Windows.Media Namespace WpfApplication1.RoutedEventDemo Public Partial Class RoutedEventDemo Inherits Window Public Sub New() InitializeComponent() End Sub Private Sub MenuItemOnClick(sender As Object, args As RoutedEventArgs) Dim str As String = TryCast(TryCast(args.Source, MenuItem).Header, String) Dim clr As Color = CType(ColorConverter.ConvertFromString(str), Color) txtblk.Foreground = New SolidColorBrush(clr) End Sub End Class End Namespace