先清空原来的button
Dim p As WinForm.TabPage = e.form.controls("TabControl1").tabpages(0)For Each c As object In p.Childrenp.RemoveControl(c.name)Next