Toolbar with Case Statement

[Jay1b]

I am trying to read the activation of toolbar button using a case

statement. I can read them fine using if statements, but tht seems unefficient.

 

The problem is, i keep getting a blue line under the is.

 

   Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick

       select e.Button is
           Case tbrOptions

           Case tbrConnect

           Case tbrPause

           Case tbrExit
       End Select

   End Sub

 

Thanks.

[mutant]

You would have to do this:

Select Case ToolBar1.Buttons.IndexOf(e.Button)

This will return to you the index of the button, and you then choose what to do based on the index.

[Jay1b]

Thanks.

[Volte]

You can use an If..EndIf block in this way.

If e.Button Is tbrOptions Then
 'Blah
ElseIf e.Button is tbrConnect Them
 'Blah
 'etc
End If

Not much different than a Select Case statement. This way you can reorder them without messing up the indexes.

[Jay1b]

Yeah i used the elseif statements when i couldnt figure out the case statements. I made the post, so i could see where i was going wrong.

 

Thanks again