<div>
 &nbsp; &nbsp; &nbsp; &nbsp;For Each obj As Object In ToolStrip1.Items<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; If TypeOf (obj) Is ToolStripButton Then<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; MessageBox.Show(&quot;ToolStrip<wbr />Button&quot;)<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; CType(obj, ToolStripButton).Visible = False 'chnage/use whatever property you like<br />
<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; ElseIf TypeOf (obj) Is ToolStripDropDownButton Then<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; MessageBox.Show(&quot;ToolStrip<wbr />DropDownBu<wbr />tton&quot;)<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; CType(obj, ToolStripDropDownButton).V<wbr />isible = False 'chnage/use whatever property you like<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; End If<br />
&nbsp; &nbsp; &nbsp; &nbsp; Next
</div>


       For Each obj As Object In ToolStrip1.Items
            If TypeOf (obj) Is ToolStripButton Then
                MessageBox.Show("ToolStripButton")
                CType(obj, ToolStripButton).Visible = False 'chnage/use whatever property you like

            ElseIf TypeOf (obj) Is ToolStripDropDownButton Then
                MessageBox.Show("ToolStripDropDownButton")
                CType(obj, ToolStripDropDownButton).Visible = False 'chnage/use whatever property you like
            End If
        Next

<div>
Desp,<br />
<br />
Your code still cannot show the menuitem within the &quot;ToolStripDropDownButton&quot; !!!<br />

</div>


Desp,

Your code still cannot show the menuitem within the "ToolStripDropDownButton" !!!


<div>
<div class="content wysiwyg-content">
I can get each item on the ToolStrip by the following codes.<br />
<br />
&nbsp; &nbsp; &nbsp; &nbsp; Dim tObj As ToolStripItem<br />
&nbsp; &nbsp; &nbsp; &nbsp; For Each tObj In ToolStrip.Items<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;debug.pring tObj.name<br />
&nbsp; &nbsp; &nbsp; &nbsp; Next<br />
<br />
However it didn't include the menu item inside the &quot;ToolStripSplitButton&quot; or &quot;ToolStripDropDownButton&quot;<br />
<br />
So how to loop through each element includes all menuitem ?<br />

</div>
</div>


I can get each item on the ToolStrip by the following codes.

        Dim tObj As ToolStripItem
        For Each tObj In ToolStrip.Items
               debug.pring tObj.name
        Next

However it didn't include the menu item inside the "ToolStripSplitButton" or "ToolStripDropDownButton"

So how to loop through each element includes all menuitem ?


How to loop through each element ToolStrip includes all menuitems

Visual Basic .NET (VB.NET) is an object-oriented programming language implemented on the .NET framework, but also supported on other platforms such as Mono and Silverlight. Microsoft launched VB.NET as the successor to the Visual Basic language. Though it is similar in syntax to  Visual Basic pre-2002, it is not the same technology,