**//
數字轉換成大寫金額
//例如:(new money(200)).tostring() == "貳佰元"
namespace
skyiv.util
catch
system.console.writeline(
"大寫: "+
newmoney(m));}}
}//該類過載的 tostring() 方法返回的是大寫金額字串
class
money}//
建構函式
public
money(
decimal
money)
catch
if(money100
==long
.minvalue) overflow
=true;}
//過載 tostring() 方法,返回大寫金額字串
public
override
string
tostring()
;value
=system.math.abs(money100);
parsesection(
true
);for
(inti =
0; i
<
unit.length
&&value
>
0; i++)
if(money100
<0"
負");return
reverse();}//
解析「片段」: 「角分(2位)」或「萬以內的一段(4位)」
void
parsesection(
bool
isjiaofen)
:new
string
;isallzero
=true
;for
(inti =
0; i
<
unit.length
&&value
>
0; i++)
", unit[i], digit[d]);
isallzero
=false;}
isprezero
=(d ==0
);value
/=10;}
}//反轉字串
string
reverse()}}
數字轉換成大寫金額
數字轉換成大寫金額 using system public class numtocaps 將數定轉換大寫金額格式 引數必須小於萬萬億,且不超過兩位小數多過兩位自動擷取兩位 返回大寫金額 public string getcaps decimal d if d 0 if s.length 0 s.l...
小寫金額轉換成大寫
原作在sql 2000中有一些問題。修正錯誤並在sql 2000中執行通過。set nocount on select v lowerstr ltrim rtrim str n lowermoney,20,2 四捨五入為指定的精度並刪除資料左右空格 select i i 1 select v upp...
將金額轉換成大寫漢字
integer li i integer li lendec,li lenint integer li amout flag integer li point string ls amount string string ls single string ls single dx string ls...