or


Private Sub AddItem(ByVal Pi_Index As Integer) Dim lObj_TStripElement As RadToolStripElement = New RadToolStripElement Dim lObj_TStripItem As RadToolStripItem = New RadToolStripItem Try Try lObj_TStripElement = TStripTop.Items(Pi_Index) Catch ex As ArgumentOutOfRangeException TStripTop.Items.Add(lObj_TStripElement) Finally lObj_TStripElement.Items.Add(lObj_TStripItem) End Try Catch ex As Exception MessageBox.Show("An unexpected error encountered " & Environment.NewLine & ex.Message()) End Try End SubNow if i call AddItem by giving it index in sequence then it implementation is fine. e.g.
call AddItem(0)
call AddItem(1)
call AddItem(2)
But if sequence of index changed then items/elements are not adding in provided sequence i.e.
AddItem(3)
AddItem(0)
AddItem(2)
AddItem(4)
AddItem(1)
