var
dAvgNum:Double;
SQLStr:String;
begin//SQLServer
SQLStr := 'Select IsNull(Avg(Field1),0) As AveNum From Table1';//Access
SQLStr := 'Select IIf(Avg(Field1) Is Null,0,Avg(Field1)) As AveNum From Table1'; with ADQuery1 do
begin
Close;
SQL.Clear;
SQl.Add(SQLStr);
Open;
end;
dAvgNum := ADOQuery1.FieldByName('AvgNum').AsString
end;
解决方案 »
- 新人求教,请问这样的SQL要怎么写。
- 有什么工具能把Java源代码转为Delphi代码或是C、C++代码吗?
- 查询信息后,如何提供打印功能
- 一个关于控件响应事件的小问题.
- delphi中如何实现c++中的new int[] 功能
- 关于只读窗体的问题。。
- 进来看的都有分!不够可以再加
- bsSkinSaveDialog 控件问题,InitialDir属性不起效 ******在线等待********
- 怎样用SQL进行成批数据复制(这批数据每个记录内容都不同)?
- 在程序中如何实现或控制MS SQL 的数据备份?
- 如何在dbgrid中的grid中加上一个其他的可视控件
- “插件”是什么时候用最好,我怎么一点思路也没有?
delcare @average1 float
select @average1=avg() from table