工具栏没有这么多项目,索引已超出范围
e.Form.Strips("工具栏2").Items.InsertControl("选择2",e.Form.Controls("选择2"),0)
e.Form.Strips("工具栏2").Items.InsertControl("选择1",e.Form.Controls("选择1"),0)
e.Form.Strips("工具栏2").Items.InsertControl("选择2",e.Form.Controls("选择2"),0)
e.Form.Strips("工具栏2").Items.InsertControl("选择1",e.Form.Controls("选择1"),0)