Wrap text in toolbar button

[Mr.No]

Hi

I'm dynamically adding buttons to a toolbar control as shown below:

Dim menuitem As CMenuItem
        Dim tbutton As ToolBarButton
        tbrMenu.Buttons.Clear()
        For Each menuitem In menulist
            tbutton = New ToolBarButton()
            With tbutton
                .Text = menuitem.MenuCaption
 
            End With
            tbrMenu.Buttons.Add(tbutton)
        Next

Some of the captions are quite long and the button is getting wide. How can I keep the button to a fixed width and then force the text to wrap itself if the width of the button is not enough?

Thanks

[Mr.No]

On another note, can somebody route me to a good tutorial on the Toolbar on the web?

Thanks

[ahollaar]

I saw you created dynamic toolbar with toolbarbuttons.
I created a dymanic toolbar to and it works.
But everytime I press on one the buttons the "button_click"
is fired 6 times (I think the 6 times is because I created 6 buttons)

Do you have to same problem and can you help me to resolve this?

Thank a lot,
AXH