Private
Dim ts() As Control = Me.ReportViewer1.Controls.Find("toolStrip1", True)
If ts IsNot Nothing ThenDim tsItem As ToolStrip = DirectCast(ts(0), ToolStrip)Dim sep As New ToolStripSeparatorDim Lab As New ToolStripLabelDim tscbo As New ToolStripComboBoxDim tboxcbo1 As New ArrayListtboxcbo1.Add(New mmtypevalues(0, "Todos"))tboxcbo1.Add(New mmtypevalues(1, "Not Used"))tboxcbo1.Add(New mmtypevalues(2, "Mandatory"))tboxcbo1.Add(New mmtypevalues(3, "Supplied"))tboxcbo1.Add(New mmtypevalues(4, "Optional"))sep.Name = "sep1"sep.Alignment = ToolStripItemAlignment.LeftLab.Name = "Lab01"Lab.Alignment = ToolStripItemAlignment.Lefttscbo.Alignment = ToolStripItemAlignment.LeftWith tscbo.ComboBox.Name = "pmtsComboBox1".BackColor = Color.Green.ForeColor = Color.White.BindingContext = Me.BindingContextValueMember = "Value".DisplayMember = "Display".DataSource = tboxcbo1End WithtsItem.Items.Add(sep)tsItem.Items.Add(Lab)tsItem.Items.Add(tscbo)AddHandler tscbo.ComboBox.SelectedIndexChanged, AddressOf pmtsComboBox1SICEnd IfThe handler detects the selectedindexchange, but I do'nt know how to access the selectedindex ofthe toolstripcombobox createdCan anyone help