if trim(cxzjmc.Text)<>'''全部''' then
begin
with adoquery7 do
begin
..............
end
else
with adoquery7 do
begin
..........( 与上一个条件不同)
end
end;
请问为什么如果不符合条件也不执行下面的循环呢?
begin
with adoquery7 do
begin
..............
end
else
with adoquery7 do
begin
..........( 与上一个条件不同)
end
end;
请问为什么如果不符合条件也不执行下面的循环呢?
begin
with adoquery7 do
begin
..............
end;
end
else
begin
with adoquery7 do
begin
..........( 与上一个条件不同)
end
end;
if 条件 then
beginend
else
begin end;
beginend
else
begin end;
最好按格式来!!
begin
with adoquery7 do
begin
..............
end
else //end else
with adoquery7 do
begin
..........( 与上一个条件不同)
end
end; //去掉请注意begin ... end 的搭配!