If iComp.GetType() = TypeOf(ToolStripButton) Then tsb = iComp strRightTag = tsb.Name.Substring(4)End If
