//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 Commands Public Partial Class TwoDocument Inherits System.Windows.Window Public Sub New() End Sub Private Sub SaveCommand(sender As Object, e As ExecutedRoutedEventArgs) Console.WriteLine("SaveCommand") End Sub Private Sub txt_TextChanged(sender As Object, e As RoutedEventArgs) Console.WriteLine("text changed") End Sub Private Sub SaveCommand_CanExecute(sender As Object, e As CanExecuteRoutedEventArgs) e.CanExecute = False End Sub End Class End Namespace