Public Delegate Sub CanQueryStatusRoutedEventHandler( _
   ByVal sender As Object, _
   ByVal e As CanQueryStatusRoutedEventArgs _
) 

Dim instance As New CanQueryStatusRoutedEventHandler(AddressOf HandlerMethod)

public delegate void CanQueryStatusRoutedEventHandler( 
   object sender,
   CanQueryStatusRoutedEventArgs e
)

public delegate CanQueryStatusRoutedEventHandler( 
    sender: TObject;
    e: CanQueryStatusRoutedEventArgs
);

public delegate CanQueryStatusRoutedEventHandler( 
   sender : Object,
   e : CanQueryStatusRoutedEventArgs
)

public: __gc __delegate void CanQueryStatusRoutedEventHandler( 
   Object* sender,
   CanQueryStatusRoutedEventArgs* e
)

public delegate void CanQueryStatusRoutedEventHandler( 
   Object^ sender,
   CanQueryStatusRoutedEventArgs^ e
)

 private void BoldCmdCanQueryStatus(object sender, CanQueryStatusRoutedEventArgs e)
 {
     e.CanQueryStatus = true;
 }

 private void BoldCmdQueryStatus(object sender, QueryStatusRoutedEventArgs e)
 {
     if (e.Command == EditingCommands.Bold)
     {
         // notifies the current bold status to the command source
         // that bound to the Bold command.

         e.QueryParameter.Value = (FontWeight)textBox1.Selection.
             GetPropertyValue(Run.FontWeightProperty) == FontWeights.Bold;
     }
 }