各位高手： 小弟又有问题麻烦各位，我想将栏位1/栏位2并形成栏位3，但栏位2中有些cell有可能为0或null，我希望当栏位2中的cell为0或null值时在相应的栏位3的cell中秀出“分母为0或空”，请教该如何实现？（如果一条条record进行判断好象会影响speed？），小弟用delphi和sql server. Thank you very much!

Hi:    你可以使用計算欄位，並於 OnCalcFields 欄位中，計算出 filed3 的值

procedure TForm1.ClientDataSet1CalcFields(DataSet: TDataSet);
begin
    if dataset.FieldByName('Field2').AsInteger = 0 then
        DataSet.FieldByName('Field3').AsString := '分母為0或空'
    else
        DataSet.FieldByName('Field3').AsString := FloatToStr(DataSet.FieldByName('Field1').AsInteger / DataSet.FieldByName('Field2').AsInteger);
end;

或是可以直接在 SQL 語法中使用 Case 指令 [code] select Filed1, Filed2 case when Filed2 = 0 then 'filed2 為零' when Filed2 is null then 'Field2 為空' else convert(char,Filed1/Filed2) end from Table [/cdeo] -------------------------------- 小弟才疏學淺，若有謬誤請不吝指教 --------------------------------

------
Fishman

有一陣子沒碰SQL了, 試一下 Select F1, F2, (Case when ISNULL(F2, 0) = 0 then '分母为0或空' else F1/F2 end) as F3 from Table 我不是高手, 高手是正在銀幕前微笑的人. 發表人 - miles 於 2004/02/03 21:27:13

------


我不是高手, 高手是正在銀幕前微笑的人.

您好!    感谢您的回应,我试了一下,只要分母为'0',就会出现以下错误,还请大大再帮帮忙!   

Hi:    問題應該出在你的第三個欄位值(DZPJE)，因為 '分母為0或空' 為VARCHAR 而 (XHZEJ / THZJE) 則為 FLOAT，因此建議將 (XHZEJ / THZJE) CONVERT 為字串，讓前後之指定型態一致     -------------------------------- 小弟才疏學淺，若有謬誤請不吝指教 --------------------------------

------
Fishman

引言: Hi: 問題應該出在你的第三個欄位值(DZPJE)，因為 '分母為0或空' 為VARCHAR 而 (XHZEJ / THZJE) 則為 FLOAT，因此建議將 (XHZEJ / THZJE) CONVERT 為字串，讓前後之指定型態一致 --------------------------------

谢谢各位大大，我已试出来了，如下： Select xhzje, thzje, (Case when ISNULL(thzje, 0) = 0 then '分母为0或空' else convert(char,xhzje/thzje) end) as F3 from xsrbb 另：fishman大大第一篇回应中"select field1,field2"后面忘了加“，”，这样才能使用 由于我入行还短，我还想再问一下，fishman大大第一种方法中"OnCalcFields"的含义是什么？我只用了adotable和adoquery，，我平时没用过OnCalcFields,查了资料写得不太明白，我试不出来，谢谢！

Hi:    luowy651，打錯字，應該是 你可以使用計算欄位，並於 OnCalcFields 事件中，計算出 filed3 的值 此用法事先行定義 DataSet 的各個 Field，並增加一個 Calculated Field，然後在DataSet 的 OnCalcFields 事件中，以 Delphi 的語法，將 Calculated Field 的值計算出來

procedure TForm1.ClientDataSet1CalcFields(DataSet: TDataSet);
begin
    if Dataset.FieldByName('THZJE').AsInteger = 0 then
        DataSet.FieldByName('THZJE').AsString := '分母為0或空'
    else
        DataSet.FieldByName(DZPJE').AsString := FloatToStr(DataSet.FieldByName('XHZEJ').AsInteger / DataSet.FieldByName('THZJE').AsInteger);
end;

-------------------------------- 小弟才疏學淺，若有謬誤請不吝指教 --------------------------------

------
Fishman

感谢Fishman大大和Miles大大，两位的方法都很好用！ 衷心感谢！