金額轉換成大寫
来源:互联网 发布:ios麻将游戏源码 编辑:程序博客网 时间:2024/05/29 19:15
<?php
$m_cash1='零壹貳參肆伍陸柒捌玖';
$m_cash2='仟佰拾萬仟佰拾元';
$m_amt=1080;
for($m_len=0;$m_len<(8-strlen($m_amt));$m_len++){
$m_add.="0";
}
$m_amt=$m_add.$m_amt;
echo $m_amt;
$m_i=1;
$m_ab='';
while($m_i<=8){
$m_ab.=substr($m_cash1,substr($m_amt,$m_i-1,1)*2,2).''.substr($m_cash2,($m_i-1)*2,2);
$m_i++;
}
echo $m_ab."<br>";
?>
javascript版本
function Chinese(num) //将阿拉伯数字翻译成中文的大写数字
{
if(!/^/d*(/./d*)?$/.test(num)){alert("Number is wrong!"); return "Number is wrong!";}
var AA = new Array("零","壹","贰","叁","肆","伍","陆","柒","捌","玖");
var BB = new Array("圆","拾","佰","仟","萬","億","点","");
var a = (""+ num).replace(/(^0*)/g, "").split("."), k = 0, re = "";
for(var i=a[0].length-1; i>=0; i--)
{
switch(k)
{
case 0 : re = BB[7] + re; break;
case 4 : if(!new RegExp("0{4}//d{"+ (a[0].length-i-1) +"}$").test(a[0]))
re = BB[4] + re; break;
case 8 : re = BB[5] + re; BB[7] = BB[5]; k = 0; break;
}
if(k%4 == 2 && a[0].charAt(i+2) != 0 && a[0].charAt(i+1) == 0) re = AA[0] + re;
if(a[0].charAt(i) != 0) re = AA[a[0].charAt(i)] + BB[k%4] + re; k++;
}
if(a.length>1) //加上小数部分(如果有小数部分)
{
re += BB[6];
for(var i=0; i<a[1].length; i++) re += AA[a[1].charAt(i)];
}
return re;
}
- 金額轉換成大寫
- VSTO 开发Word时,引用其它library时容易忽略的问题。
- 探密PE文件格式(Portable Executable File Format)(上)
- 通过下面代码可以解决从表单得到的数据是乱码的问题
- Peer-to-Peer (P2P) communication across middleboxes(翻译7)
- CVS使用(1)
- 金額轉換成大寫
- WindowsNT/2K/XP/2K3系统实用工具集【推荐】
- [转贴]ASP.Net环境下使用Jmail组件发送邮件
- Linux下的信号编程小结
- 多进程编程
- 独立之人格自由之思想
- 使用ADO.NET轻松操纵数据库
- 在linux下使用ndiswrapper加载windows的无线网卡驱动
- CVS使用(2)