社区
C++ Builder
帖子详情
c++bulider如何将报表中数值表示的钱转化为用中文大写的(列:100.50-->一佰零伍角)
wbh0360
2003-11-20 04:49:58
如何将数值表示的钱转化为用中文大写的(列:100.50-->一佰零伍角)
...全文
59
1
打赏
收藏
微信扫一扫
点击复制链接
分享
下载分享明细
分享
举报
写回复
1 条
回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
ccrun.com
2003-11-20
//---------------------------------------------------------------------------
#include <math.h>
//---------------------------------------------------------------------------
// 人民币大写转换程序:
// String NumToRMBStr(double val);
//---------------------------------------------------------------------------
// 常量字符串定义,如修改也可变为转换普通汉字函数(如:一二三,十百千)
const char *HanDigiStr[] = {"零","壹","贰","叁","肆","伍","陆","柒","捌","玖"};
const char *HanDiviStr[] = { "","拾","佰","仟","万","拾","佰","仟","亿",
"拾","佰","仟","万","拾","佰","仟","亿",
"拾","佰","仟","万","拾","佰","仟" };
AnsiString PositiveIntegerToHanStr(const AnsiString &NumStr)
{
// 输入字符串必须正整数,只允许前导空格(必须右对齐),不宜有前导零
AnsiString RMBStr;
int len,n,lastzero=0;
int hasvalue=0; // 亿、万进位前有数值标记
len = NumStr.Length();
if( len > 24 ) return "数值过大!";
for(int i=len-1;i>=0;i--)
{
if( NumStr[len-i]==' ' ) continue; // AnsiString[] base is 1
n = NumStr[len-i] - '0';
if( n<0 || n>9 ) return "输入含非数字字符!";
if( n!=0 )
{
if( lastzero ) RMBStr += HanDigiStr[0]; // 若干零后若跟非零值,只显示一个零
// 除了亿万前的零不带到后面
// if( !( n==1 && (i%4)==1 && (lastzero || i==len-1) ) ) // 如十进位前有零也不发壹音用此行
// if( !( n==1 && (i%4)==1 && i==len-1 ) ) // 十进位处于第一位不发壹音
RMBStr += HanDigiStr[n];
RMBStr += HanDiviStr[i]; // 非零值后加进位,个位为空
hasvalue = 1; // 置万进位前有值标记
}
else
{
if( (i%8)==0 || ((i%8)==4 && hasvalue) ) // 亿万之间必须有非零值方显示万
RMBStr += HanDiviStr[i]; // "亿"或"万"
}
if( i%8==0 ) hasvalue = 0; // 万进位前有值标记逢亿复位
lastzero = (n==0) && (i%4!=0); // 亿万前有零后不加零,如:拾万贰仟
}
if( RMBStr.Length()==0 ) return HanDigiStr[0]; // 输入空字符或"0",返回"零"
return RMBStr;
}
AnsiString NumToRMBStr(double val)
{
AnsiString SignStr,TailStr;
double fraction, integer;
int jiao,fen;
if( val<0 )
{
val = -val;
SignStr = "负";
}
fraction = modf(val+0.005, &integer); // 四舍五入到分
jiao = int(fraction*10);
fen = int(fraction*100)-jiao*10;
if( jiao==0 && fen==0 )
{
TailStr = "整";
}
else
{
TailStr = HanDigiStr[jiao];
if( jiao!=0 )
TailStr += "角";
if( integer==0 && jiao==0 ) // 零元后不写零几分
TailStr = "";
if( fen!=0 )
TailStr += HanDigiStr[fen] + AnsiString("分");
}
// 下一行可用于非正规金融场合,0.03只显示"叁分"而不是"零元叁分"
// if( integer==0 ) return SignStr+TailStr;
return SignStr+PositiveIntegerToHanStr( AnsiString(integer) )+"元"+TailStr;
}
//-----------------------------------------------------------
// 基本考虑
// 人民币大写单位银行规定用"元"
// 无零头金额后跟"整",有则不跟
// 角为零时不写角(如:零叁分)
// 四舍五入到分
// 为减少判读疑惑(一般对大写金额预期较高)和
// 体现人民币基本单位为元,金额低于壹圆前仍加"零元"
// 整数转换
// 若干零后若跟非零值,只显示一个零,否则不显示
// 万(亿)前有零后不加零,因亿、万为一完整单位,
// (如:拾万贰仟 比 拾万零贰仟 更顺些)
// 亿为汉语计数最大单位,只要进位到总是显示(如:壹亿亿)
// 万为次最大单位,亿万之间必须有非零值方显示万
// (如"壹亿"不可显示为"壹亿万")
//
// 为减少被窜改的可能性,十进位总发壹音,这和下面的习惯读法不一样
// (十进位处于第一位不发壹音,如"拾元"非"壹拾元",
// 十进位处前有零是否不发壹音不太确定,
// 如"叁仟零壹拾元"还是"叁仟零拾元"?)
// 用"拾万"不用"壹拾万",因为每个整数进位后都有进位单位(拾佰仟万亿)
// 这样即使金额前没有附防窜改的前缀如"人民币"字样也难窜改些
// 因为至少要加添两个汉字并且改动后数字必须进位才能窜改成
// (如"拾万"可改成"叁拾万",而"壹拾万"至少要改成"壹佰壹拾万")
// 此函数为Borland C++ Builder编写,已充分考虑到跨平台兼容性
// 如需转换到其它场合,
// 只需修改字符串类型从AnsiString到对应的类型、功能及函数
// (注意两个char*型字符串不可以直接相加,需有一个先转换)
// public domain freeware by 王大庆 2003年3月-5月 v1.1
// 此函数如有不妥之处请email: wang_daqing@21cn.com
AnsiString DigitsToChn(AnsiString sNum)
{
sNum = FormatFloat("0.00", StrToFloat(sNum));
if ( StrToFloat(sNum) < 0 )
return "警告:金额不能为负数!";
else if ( sNum == "0.00")
return "零元整";
else if ( sNum.Length() > 15 )
return "警告:金额超过\"千亿\"位数!";
int iLen = 0;
int iWordPos = 0; //汉字在串中的位置
AnsiString sCmp = "0"; //用作比较相邻数字
AnsiString sDgt = ""; //对应的该位数名称
AnsiString sReturn = ""; //要返回的字符串
AnsiString sSingle = ""; //单个数字符
AnsiString sChn = "壹贰叁肆伍陆柒捌玖";
AnsiString sDigits = "分角圆拾佰仟万拾佰仟亿拾佰仟";
sNum.Delete(sNum.Pos('.'), 1);
iLen=sNum.Length();
for (int i = iLen, j=1; i >0, j<iLen+1; i--, j++)
{
sSingle = sNum.SubString(i, 1);
sDgt = sDigits.SubString(j*2-1, 2);//取得位名称
if (sSingle!="0")
{
sReturn = sDgt + sReturn;//加入该位名称
iWordPos= StrToInt(sSingle)*2-1;//汉字位置
sReturn = sChn.SubString(iWordPos, 2) + sReturn;//加入该位汉字
}
else
{
if ((sDgt=="圆") || (sDgt=="万") || (sDgt=="亿"))
sReturn = sDgt + sReturn; //即使该数为零,也必须加入该主数位名称
if (sCmp!="0") //如果后者不为"0"(即不是连续的零串),则加入该"零"...
sReturn = "零" + sReturn;
}
sCmp=sSingle;
}
//如果末尾小数为0...
if (sNum.SubString(iLen, 1)=="0")
sReturn+="整";
return sReturn;
}
打赏
举报
回复
赞
相关推荐
如何制作网页-初学者入门HTML+CSS
HTML5期末考核大作业源码 包含 个人、 美食、 公司、 学校、 旅游、 电商、 宠物、 电器、 茶叶、 家居、 酒店、 舞 蹈、 动漫、 服装、 体育、 化妆品、 物流、 环保、 书籍、 婚纱、游戏、 节日、 戒烟、 电影、 摄影、 文化、 家 乡、 鲜花、 礼品、 汽车、 其他 可满足大学生网页大作业网页设计作业需求, 喜欢的可以下载! 原生(HTML+CSS+JS),网页作品代码简单,可使用任意HTML编辑软件(如:`Dreamweaver、HBuilder、Vscode 、Sublime 、 Webstorm、Text 、Notepad++` 等任意html编辑软件进行运行及修改编辑等操作) HTML静态网页设计作业,采用DIV+CSS布局,共有多个页面,使用CSS排版比较丰富,色彩鲜明有活力,顶部导航及底部 区域背景色为100%宽度。都是给学生定制的都符合学生考试期末作业的水平,有的有js,有的视频+音乐+flash的等 元素的插入。 【查看更多源码地址】:https://blog.csdn.net/VX_WJ88950106?type=blog
浮点数
转化
器,单精度浮点计算软件,FLOAT转HEX
浮点数
转化
器,单精度浮点计算软件,FLOAT转HEX
内存泄露,闭包 内存泄露,闭包 内存泄露,闭包
内存泄露,闭包 内存泄露,闭包 内存泄露,闭包
情人节程序员用HTML网页表白【情人节表白网页】 HTML5七夕情人节表白网页源码 HTML+CSS+JavaScript
HTML5期末考核大作业源码 包含 个人、 美食、 公司、 学校、 旅游、 电商、 宠物、 电器、 茶叶、 家居、 酒店、 舞 蹈、 动漫、 服装、 体育、 化妆品、 物流、 环保、 书籍、 婚纱、游戏、 节日、 戒烟、 电影、 摄影、 文化、 家 乡、 鲜花、 礼品、 汽车、 其他 可满足大学生网页大作业网页设计作业需求, 喜欢的可以下载! 原生(HTML+CSS+JS),网页作品代码简单,可使用任意HTML编辑软件(如:`Dreamweaver、HBuilder、Vscode 、Sublime 、 Webstorm、Text 、Notepad++` 等任意html编辑软件进行运行及修改编辑等操作) HTML静态网页设计作业,采用DIV+CSS布局,共有多个页面,使用CSS排版比较丰富,色彩鲜明有活力,顶部导航及底部 区域背景色为100%宽度。都是给学生定制的都符合学生考试期末作业的水平,有的有js,有的视频+音乐+flash的等 元素的插入。 【查看更多源码地址】:https://blog.csdn.net/VX_WJ88950106?type=blog
维基百科-Latex语法-帮助文档-离线网页-html
维基百科-Latex语法-帮助文档-离线网页-html
发帖
C++ Builder
微信扫一扫
点击复制链接
分享社区
下载分享明细
1.3w+
社区成员
10.2w+
社区内容
C++ Builder相关内容讨论区
社区管理员
加入社区
帖子事件
创建了帖子
2003-11-20 04:49
社区公告
暂无公告