Mega Code Archive

 

Categories / VB.Net Tutorial / WPF

 

Command Enabling

<Window x: Class="WpfApplication1.Window1"     xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"     xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"     Title="CommandEnabling" Height="300" Width="300"     >   <Grid>     <Menu VerticalAlignment="Top">       <MenuItem Header="_Edit">         <MenuItem Command="Redo" />       </MenuItem>     </Menu>   </Grid> </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 Window1     Inherits System.Windows.Window     Public Sub New()       InitializeComponent()       Dim redoCommandBinding As New CommandBinding(ApplicationCommands.Redo)       AddHandler redoCommandBinding.CanExecute, AddressOf RedoCommandCanExecute       CommandBindings.Add(redoCommandBinding)     End Sub     Private Sub RedoCommandCanExecute(sender As Object, e As CanExecuteRoutedEventArgs)       e.CanExecute = DateTime.Now.Second Mod 2 > 1     End Sub   End Class End Namespace