Question

Tengo un ToolStrip con muchos elementos o botones y tengo un listbox(ListaDescriptores) el cual quiero llenar con el texto de todo elemento del ToolStrip que sea clickeado :

Ahora mi ToolStrip se llama ToolstripFragancia, tengo una la siguiente función que hallé en otra página como ejemplo y adaptado a mi problema queda asi :

 Private Sub ToolStripFragancia_Click(sender As Object, e As EventArgs) Handles tsFloral.click, tsFrutal.click, tsChocolate.click
        Dim btn As ToolStripButton = CType(sender, ToolStripButton)

        Select Case btn.Name
            Case "tsFloral"
               Msgbox("1")
            Case "tsFrutal"
               Msgbox("2")
            Case "tsChocolate"
               Msgbox("3")
        End Select

End Sub

Ahora como verán aun no estoy añadiendo nada al listbox porque estoy probando que funcione al clickear el elemento y sale un error en la linea: Dim btn As ToolStripButton = CType(sender, ToolStripButton)
El error es :
No se puede convertir un objeto de tipo 'System.Windows.Forms.ToolStripSplitButton' al tipo 'System.Windows.Forms.ToolStripButton'.

¿Qué ocurre ? ¡cómo puedo solucionarlo ?

Answer 1

:D Disculpad. Ya hallé el error.

No se debia declarar como ToolStripButton sino como ToolStripItem. Asi:

Dim btn As ToolStripItem = CType(sender, ToolStripItem)