第3 - 7句改成ADOQuery1.SQL.Add('select * from '+trim(ComboBox1.Text));ADOQuery1.Active:=true;就可以了。注意只需要任意一个ADOQuery1.Active:=true; /ADOQuery1.ExecSQL; / ADOQuery1.Open; ,它们的用处是一样的。