全省快速服務,舊屋翻修、廠房拆除等大小工程
價格透明線上可查,事後清運還原
台北居家清潔推薦NO1搬家公司,免費紙箱,服務不打烊
打包家當不煩惱,落地不加價,歡迎來電預約估價

首頁  •  j2h 論壇 • 程式設計討論     • 

[教學]阿拉伯數字轉為大寫國字

房東:小橋
發表時間:2007-05-08
[檢舉]


function getChineseNumber($money){

$ar = array(\"零\", \"壹\", \"貳\", \"參\", \"肆\", \"伍\", \"陸\", \"柒\", \"捌\", \"玖\") ;
$cName = array(\"\", \"\", \"拾\", \"佰\", \"仟\", \"萬\", \"拾\", \"佰\", \"仟\", \"億\", \"拾\", \"佰\", \"仟\");
$conver = \"\";
$cLast = \"\" ;
$cZero = 0;
$i = 0;
for ($j = strlen($money) ; $j >=1 ; $j--){
$cNum = intval(substr($money, $i, 1));
$cunit = $cName[$j]; //取出位數
if ($cNum == 0) { //判斷取出的數字是否為0,如果是0,則記錄共有幾0
$cZero++;
if (strpos($cunit,\"萬億\") >0 && ($cLast == \"\")){ // \'如果取出的是萬,億,則位數以萬億來補
$cLast = $cunit ;
}
}else {
if ($cZero > 0) {// \'如果取出的數字0有n個,則以零代替所有的0
if (strpos(\"萬億\", substr($conver, strlen($conver)-2)) >0) {
$conver .= $cLast; //\'如果最後一位不是億,萬,則最後一位補上\"億萬\"
}
$conver .= \"零\" ;
$cZero = 0;
$cLast = \"\" ;
}
$conver = $conver.$ar[$cNum].$cunit; // \'如果取出的數字沒有0,則是中文數字+單位
}
$i++;
}
//\'判斷數字的最後一位是否為0,如果最後一位為0,則把萬億補上
if (strpos(\"萬億\", substr($conver, strlen($conver)-2)) >0) {
$conver .=$cLast; // \'如果最後一位不是億,萬,則最後一位補上\"億萬\"
}
return $conver;
}





  • 贊助網站       

    廣利不動產-板橋在地生根最實在--新板特區指名度最高、值得您信賴的好房仲
    完整房訊,房屋、店面熱門精選物件,廣利不動產 優質仲介,房屋租賃、買賣資訊透明,交易真安心!
    廣利不動產-新板特區指名度最高、值得您信賴的好房仲
    您的托付,廣利用心為您服務



  •  共 0 人回應

    姓名:
    佈告內容: