Firing Toolbar ButtonClick Event manually

[Brian Mitchell]

How do you fire a toolbar ButtonClick event manually (for a specified
button)?

I have a toolbar with 4 buttons on it and I want to fire one of the button
events when the user clicks a different button on the form.

The event for the toolbar looks like this...

Private Sub tbUsers_ButtonClick(ByVal sender As System.Object, ByVal e As
System.Windows.Forms.ToolBarButtonClickEventArgs) Handles
tbUsers.ButtonClick
Select Case e.Button.Text

Case "WhateverTheText"
....
....
....

End Select

End Sub


When I try to fire the event manually and pass a value for e.button.text, I
get an error "Value 'Boolean' cannot be converted to
ToolBarButtonClickEventArgs"

ie..

Public Sub Button
tbUsers_ButtonClick(Me, e.Button.Text="WhateverTheText")
End Sub


Is there some other special way I have to specify what button event I want
fired?

Thanks!!

 

[Herfried K. Wagner [MVP]]

I have a toolbar with 4 buttons on it and I want to fire one of the button
events when the user clicks a different button on the form.

The event for the toolbar looks like this...

Private Sub tbUsers_ButtonClick(ByVal sender As System.Object, ByVal e As
System.Windows.Forms.ToolBarButtonClickEventArgs) Handles
tbUsers.ButtonClick
Select Case e.Button.Text

Case "WhateverTheText"
....
....
....

End Select

End Sub


When I try to fire the event manually and pass a value for e.button.text, I
get an error "Value 'Boolean' cannot be converted to
ToolBarButtonClickEventArgs"

Why not place the code which should be executed on button click in a
separate procedure and call this procedure directly?

 

[CJ Taylor]

You cannot raise an event outside of the class it was declared in.

 

[Scott]

The problem is that you're trying to pass in a boolean expression
(e.Button.Text="WhateverTheText" does not set anything in this context, it
is simply true or false) where you should be passing a
ToolBarButtonClickEventArgs object. Try the following...

Dim e As ToolBarButtonClickEventArgs
e.Button = tbUsers.Buttons(index of button to click)
tbUsers_ButtonClick(Me, e)

 

[Brian Mitchell]

Thank You all for the suggestions.

The problem is that you're trying to pass in a boolean expression
(e.Button.Text="WhateverTheText" does not set anything in this context, it
is simply true or false) where you should be passing a
ToolBarButtonClickEventArgs object. Try the following...

Dim e As ToolBarButtonClickEventArgs
e.Button = tbUsers.Buttons(index of button to click)
tbUsers_ButtonClick(Me, e)


e.button.text,