全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1396
推到 Plurk!
推到 Facebook!

如何讓小於0的值都顯示為0

答題得分者是:P.D.
lovemari
中階會員


發表:134
回覆:224
積分:76
註冊:2005-08-18

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-03-18 15:20:49 IP:60.248.xxx.xxx 訂閱
各位大大們好
小弟有各問題,在計算的公式中,如果小於0 如何讓他就只能顯示0而已
現在我的語法會有-100% OR -200%的
我想讓小於0的都顯示成為0% 是否從那邊下手呢

[code delphi]
ROUND(((COUNT(DISTINCT A.SERIAL_NUMBER)) - (COUNT(DISTINCT E.SERIAL_NUMBER))) * 100 / (COUNT(DISTINCT A.SERIAL_NUMBER)))||'%' "直通率"
[/code]


感激不盡....
------
Program : Delphi 7
DataBase : Oracle 9i
Client : ClientDataSet
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-03-18 17:17:05 IP:61.67.xxx.xxx 未訂閱
為什麼不直攐加一行語法
IF XXX < 0 THEN XXX:= 0 不就好了
lovemari
中階會員


發表:134
回覆:224
積分:76
註冊:2005-08-18

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-03-19 18:41:55 IP:60.248.xxx.xxx 訂閱

===================引 用 P.D. 文 章===================
為什麼不直攐加一行語法
IF XXX < 0 THEN XXX:= 0 不就好了



Dear PD 大

我下這樣寫程式可以跑 可是依然沒有把小於0的改成0耶


[code delphi]

if StringGrid1.Cells[10,StringGrid1.rowcount-1] < '0' then
StringGrid1.Cells[10,StringGrid1.rowcount-1] := '0';

[/code]
------
Program : Delphi 7
DataBase : Oracle 9i
Client : ClientDataSet
編輯記錄
lovemari 重新編輯於 2008-03-19 18:42:16, 註解 無‧
lovemari 重新編輯於 2008-03-19 18:42:40, 註解 無‧
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#4 引用回覆 回覆 發表時間:2008-03-19 23:43:50 IP:61.67.xxx.xxx 未訂閱
1.首先, 你必須先弄懂 字串string與數值(integer, double)比對的差異性在那裡
2.想請問你, '1'>'0" , '0' > '0', '-1'> '0', '-1'>'00', 這裡有那幾個是成立的, 你用程式去寫, 馬上就知道
3.字串的比對是符號的相比 除此外, 字串還有字數的問題, 查一下書就知道先後順序的規則
4.幾乎沒有人用字串的數字法來比對, 建議你轉數值後比對, 再填入cell中
===================引 用 lovemari 文 章===================
Dear PD 大

我下這樣寫程式可以跑 可是依然沒有把小於0的改成0耶


if StringGrid1.Cells[10,StringGrid1.rowcount-1] < '0' then
StringGrid1.Cells[10,StringGrid1.rowcount-1] := '0';

系統時間:2024-05-04 11:10:22
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!