Using the access text escape Use two underline characters if you want an underline to appear in your text
//File:Window.xaml.vb
Imports System
Imports System.Collections.Generic
Imports System.Text
Imports System.Windows
Imports System.Windows.Controls
Namespace AccessTextSimple
Partial Class Pane1
Inherits StackPanel
Public Sub New()
InitializeComponent()
End Sub
Private Sub hello_Click(sender As Object, e As RoutedEventArgs)
MessageBox.Show("button")
End Sub
End Class
End Namespace