適用於10萬以內的金額
function
rmb_upper
($num
)//print_r($arr_left);
//output:array ( [0] => 1 [1] => 2 [2] => 3 [3] => 4 [4] => 5 )
for($i=
0;$i<
$len_right;$i
++)//print_r($arr_right);
//output:array ( [0] => 6 [1] => 7 )
//構造陣列$daxie
$daxie
=array
('0'
=>
'零',
'1'=
>
'壹',
'2'=
>
'貳',
'3'=
>
'叄',
'4'=
>
'肆',
'5'=
>
'伍',
'6'=
>
'陸',
'7'=
>
'柒',
'8'=
>
'捌',
'9'=
>
'玖',);
//迴圈將陣列$arr_left中的值替換成大寫
foreach
($arr_left
as$k
=>$v)
}//print_r($arr_left);
//output :array ( [0] => 壹萬 [1] => 貳千 [2] => 叄百 [3] => 肆十 [4] => 伍元 )
foreach
($arr_right
as$k
=>$v)
}//print_r($arr_right);
//output :array ( [0] => 陸角 [1] => 柒分 )
//將陣列轉換成字串,並拼接在一起
$new_left_str
=implode(''
,$arr_left);
$new_right_str
=implode(''
,$arr_right);
$new_str
=$new_left_str
.$new_right_str
;//echo $new_str;
//output :'壹萬貳千叄百肆十伍元陸角柒分'
//如果金額中帶有0,大寫的字串中將會帶有'零千零百零十',這樣的字串,需要替換掉
$new_str
=str_replace
('零萬'
,'零'
,$new_str);
$new_str
=str_replace
('零千'
,'零'
,$new_str);
$new_str
=str_replace
('零百'
,'零'
,$new_str);
$new_str
=str_replace
('零十'
,'零'
,$new_str);
$new_str
=str_replace
('零零零'
,'零'
,$new_str);
$new_str
=str_replace
('零零'
,'零'
,$new_str);
$new_str
=str_replace
('零元'
,'元'
,$new_str);
//echo'
';return
$new_str
;}
數字轉換成大寫金額
數字轉換成大寫金額 using system public class numtocaps 將數定轉換大寫金額格式 引數必須小於萬萬億,且不超過兩位小數多過兩位自動擷取兩位 返回大寫金額 public string getcaps decimal d if d 0 if s.length 0 s.l...
數字轉換成大寫金額
數字轉換成大寫金額 例如 new money 200 tostring 貳佰元 namespace skyiv.util catch system.console.writeline 大寫 newmoney m 該類過載的 tostring 方法返回的是大寫金額字串 class money 建構函式...
irport報表,把數字金額轉換成大寫人民幣金額
1 編寫oracle函式 create or replace function moneytochinese money in number return varchar2 is stryuan varchar2 150 stryuanfen varchar2 152 numlenyuan numb...