是清除所显示的?Private Sub Command1_Click()Text1.Text = ""Label1.Caption = ""End Sub不能删除控件(如果用Controls.Add添加的可以删除控件)