Mega Code Archive

 

Categories / VB.Net / WPF

 

Press F1 to get help

<Window x:Class="WpfApplication1.MainWindow"     xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"     xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"     Title="Press F1 to get help" Height="250" Width="400">   <DockPanel>     <Menu DockPanel.Dock ="Top" HorizontalAlignment="Left" Background="White">       <MenuItem Header="_Edit">         <MenuItem Command ="Copy"/>         <MenuItem Command ="Cut"/>         <MenuItem Command ="Paste"/>       </MenuItem>     </Menu>     <TextBox AcceptsReturn ="True" Foreground ="Black" Background ="AliceBlue"></TextBox>   </DockPanel>    </Window> //File:Window.xaml.vb Imports System Imports System.Collections.Generic 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.Shapes Namespace WpfApplication1   Public Partial Class MainWindow     Inherits System.Windows.Window     Public Sub New()       InitializeComponent()       Dim helpBinding As New CommandBinding(ApplicationCommands.Help)       AddHandler helpBinding.CanExecute, AddressOf CanHelpExecute       AddHandler helpBinding.Executed, AddressOf HelpExecuted       CommandBindings.Add(helpBinding)     End Sub     Private Sub CanHelpExecute(sender As Object, e As CanExecuteRoutedEventArgs)       e.CanExecute = True     End Sub     Private Sub HelpExecuted(sender As Object, e As ExecutedRoutedEventArgs)       MessageBox.Show("support", "Help!")     End Sub   End Class End Namespace