Dim tsb1, tsb2 As ToolStripButton
tsb1 = New ToolStripButton()
tsb2 = New ToolStripButton()
Dim tss As ToolStripSeparator
tss = New ToolStripSeparator()
tsb1.Text = "MENU1"
tsb2.Text = "MENU2"
Me.ToolStrip.Items.Add(tsb1)
Me.ToolStrip.Items.Add(tss)
Me.ToolStrip.Items.Add(tsb2)
tss = New ToolStripSeparator()
Me.ToolStrip.Items.Add(tss)