If CheckBox1.Checked Then ...SQL.ADD(Delete From TableName1)... If CheckBox2.Checked Then ...SQL.ADD(Delete From TableName2)... If CheckBox3.Checked Then ...SQL.ADD(Delete From TableName3)... 。 。 。
----------------------------------------------
『惠安人才网』 www.harcw.net
兄弟,友情建议:写代码规范些! If CheckBox2.Checked Then Do Begin With DM.ADOQuery2 Do Begin Close; SQL.Clear; SQL.Add('Delete * From ban'); //可以不加 * 号 ExecSQL; End; End;
----------------------------------------------
『惠安人才网』 www.harcw.net