ToolBarButtonClickEventHandler Delegate
Represents the method that will handle the ButtonClick event of a ToolBar.
Assembly: System.Windows.Forms (in System.Windows.Forms.dll)
'Declaration Public Delegate Sub ToolBarButtonClickEventHandler ( _ sender As Object, _ e As ToolBarButtonClickEventArgs _ ) 'Usage Dim instance As New ToolBarButtonClickEventHandler(AddressOf HandlerMethod)
Parameters
- sender
- Type: System.Object
The source of the event.
- e
- Type: System.Windows.Forms.ToolBarButtonClickEventArgs
A ToolBarButtonClickEventArgs that contains the event data.
When you create a ToolBarButtonClickEventHandler delegate, you identify the method that will handle the event. To associate the event with your event handler, add an instance of the delegate to the event. The event handler is called whenever the event occurs, unless you remove the delegate. For more information about handling events with delegates, see Events and Delegates.
The following example instantiates a ToolBar and three ToolBarButton controls. The toolbar buttons are assigned to the button collection, the collection is assigned to the toolbar, and the toolbar is added to the form. On the ButtonClick event of the toolbar, the Button property of the ToolBarButtonClickEventArgs is evaluated, and the appropriate dialog opened. This code assumes that a Form, an OpenFileDialog, a SaveFileDialog, and a PrintDialog have been instantiated.
Public Sub InitializeMyToolBar() ' Create and initialize the ToolBar and ToolBarButton controls. Dim toolBar1 As New ToolBar() Dim toolBarButton1 As New ToolBarButton() Dim toolBarButton2 As New ToolBarButton() Dim toolBarButton3 As New ToolBarButton() ' Set the Text properties of the ToolBarButton controls. toolBarButton1.Text = "Open" toolBarButton2.Text = "Save" toolBarButton3.Text = "Print" ' Add the ToolBarButton controls to the ToolBar. toolBar1.Buttons.Add(toolBarButton1) toolBar1.Buttons.Add(toolBarButton2) toolBar1.Buttons.Add(toolBarButton3) ' Add the event-handler delegate. AddHandler toolBar1.ButtonClick, AddressOf Me.toolBar1_ButtonClick ' Add the ToolBar to the Form. Controls.Add(toolBar1) End Sub Private Sub toolBar1_ButtonClick(ByVal sender As Object, _ ByVal e As ToolBarButtonClickEventArgs) ' Evaluate the Button property to determine which button was clicked. Select Case toolBar1.Buttons.IndexOf(e.Button) Case 0 openFileDialog1.ShowDialog() ' Insert code to open the file. Case 1 saveFileDialog1.ShowDialog() ' Insert code to save the file. Case 2 printDialog1.ShowDialog() ' Insert code to print the file. End Select End Sub
Windows 7, Windows Vista, Windows XP SP2, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP Starter Edition, Windows Server 2008 R2, Windows Server 2008, Windows Server 2003, Windows Server 2000 SP4, Windows Millennium Edition, Windows 98, Windows CE, Windows Mobile for Pocket PC
The .NET Framework and .NET Compact Framework do not support all versions of every platform. For a list of the supported versions, see .NET Framework System Requirements.