您所在位置：主题：帮我看看 这段代码 错在那
kao1982215
[专家分：0] 发布于 2006-09-19 21:18:00
if ComboBox1.Txet=('一月') then
begin
ADOTable2.First;
adoquery1.SQL.Add('select 业绩量 from 工作表 where state like'+'''%'+ComboBox1.Text='一月'+'%''' );
adoquery1.SQL.Add('select 业绩量 from 工作表 where state like'+'''%'+ComboBox1.Text='十一月'+'%''' );
adoquery1.SQL.Add('select 业绩量 from 工作表 where state like'+'''%'+ComboBox1.Text='十二月'+'%''' );
sum1:=sum1+ADOTable2.fieldbyname('业绩量').value;
ADOTable2.next;
end;
begin
ADOTable2.First;
adoquery1.SQL.Add('select 业绩量 from 工作表 where state like'+'''%'+ComboBox1.Text='一月'+'%''' );
adoquery1.SQL.Add('select 业绩量 from 工作表 where state like'+'''%'+ComboBox1.Text='十一月'+'%''' );
adoquery1.SQL.Add('select 业绩量 from 工作表 where state like'+'''%'+ComboBox1.Text='十二月'+'%''' );
sum1:=sum1+ADOTable2.fieldbyname('业绩量').value;
ADOTable2.next;
end;
