配色: 字号:
人民币大小写转换算法(转)
2014-12-24 | 阅:  转:  |  分享 
  
1.先把你的金额转换成ChatString类型;

2.把ChatStrin类型的金额变量已小数点为界分成两个部分;

3.分别用两个转换函数对小数点左右部分进行转换



AnsiStringChineseNumber(AnsiStringnum)

{

num.Delete(num.Length()-2,1);//删除小数点

num.Insert(num.StringOfChar(''0'',8-num.Length()),1);

AnsiStringretval="",CNum="零壹贰叁肆伍陆柒捌玖",CUnit="拾万仟佰拾元

角分";

for(intp,i=1;i<9;i++)

{

p=num.SubString(i,1).ToInt();

retval+=CNum.SubString(p2+1,2)+CUnit.SubString(i2-1,2);

}

returnretval;

献花(0)
+1
(本文系超过巴菲特首藏)