如何将数字转换成规范的人民币大写形式？

本文共计419个文字，预计阅读时间需要2分钟。

phpfunction numTrmb($num) { $d=array(零, 壹, 贰, 叁, 肆, 伍, 陆, 柒, 捌, 玖); $e=array('元', '拾', '佰', '仟', '万', '拾万', '百万', '千万', '亿', '拾亿', '百亿', '千亿'); $p=array('分'); $result=''; $num=number_format($num, 2, '.', ''); $num=str_replace(',', '', $num); $len=strlen($num); for ($i=0; $i < $len; $i++) { $n=$num[$i]; $result .=$d[$n]; if ($i==$len - 1 && $num[$i] !=0) { $result .=$p[0]; } if ($i !=$len - 1) { $result .=$e[$len - 1 - $i]; } } return $result;}

<?php function numTrmb($num) { $d = array("零", "壹", "贰", "叁", "肆", "伍", "陆", "柒", "捌", "玖"); $e = array('元', '拾', '佰', '仟', '万', '拾万', '佰万', '仟万', '亿', '拾亿', '佰亿', '仟亿'); $p = array('分', '角'); $zheng = "整"; $final = array(); $inwan = 0;//是否有万 $inyi = 0;//是否有亿 $len = 0;//小数点后的长度 $y = 0; $num = round($num, 2);//精确到分 if (strlen($num) > 15) { return "金额太大"; die(); } if ($c = strpos($num, '.')) {//有小数点,$c为小数点前有几位 $len=strlen($num)-strpos($num,'.')-1;//小数点后有几位数 }else {//无小数点 $c = strlen($num); $zheng = '整'; } for ($i = 0; $i < $c; $i++) { $bit_num = substr($num, $i, 1); if ($bit_num != 0 || substr($num, $i + 1, 1) != 0) { @$low = $low . $d[$bit_num]; } if ($bit_num || $i == $c - 1) { @$low = $low . $e[$c - $i - 1]; } } if($len!=1){ for ($j = $len; $j >= 1; $j--) { $point_num = substr($num, strlen($num) - $j, 1); @$low = $low . $d[$point_num] . $p[$j - 1]; } }else{ $point_num = substr($num, strlen($num) - $len, 1); $low=$low.$d[$point_num].$p[$len]; } $chinses = str_split($low, 3);//字符串转化为数组 for ($x = count($chinses) - 1; $x >= 0; $x--) { if ($inwan == 0 && $chinses[$x] == $e[4]) {//过滤重复的万 $final[$y++] = $chinses[$x]; $inwan = 1; } if ($inyi == 0 && $chinses[$x] == $e[8]) {//过滤重复的亿 $final[$y++] = $chinses[$x]; $inyi = 1; $inwan = 0; } if ($chinses[$x] != $e[4] && $chinses[$x] !== $e[8]) { $final[$y++] = $chinses[$x]; } } $newstr = (array_reverse($final)); $nstr = join($newstr); if ((substr($num, -2, 1) == '0') && (substr($num, -1) <> 0)) { $nstr = substr($nstr, 0, (strlen($nstr) -6)).'零'. substr($nstr, -6, 6); } $nstr=(strpos($nstr,'零角')) ? substr_replace($nstr,"",strpos($nstr,'零角'),6) : $nstr; return $nstr = (substr($nstr,-3,3)=='元') ? $nstr . $zheng : $nstr; } echo numTrmb(556455456156.65);