pb中将金额转化为人民币大写
string cn_n[10] = {"零","壹","贰","叁","肆","伍","陆","柒","捌","玖"} // 大写0-9
string cn_c[18] = {"分","角","元","拾","佰","仟","万","拾","佰","仟","亿","拾","佰","仟","万","拾","佰","仟"}
string ls_number,ls_rc
integer li_pos,li_for,li_len
If number < 0 Then ls_rc = "负"
ls_number = string(ABS(Number) * 100,"0")
li_len = Len(ls_number)
If li_len > UpperBound(cn_c) Then Return ''
For li_for = 1 To li_len
li_pos = Integer(Mid(ls_number,li_for,1))
If li_pos <> 0 Then 非零值的处理,很简单
ls_rc += cn_n[li_pos + 1] + cn_c[li_len - li_for + 1]
ElseIf Mod(li_len - li_for - 2,4) = 0 Then ///元、万、亿、万亿进位
If Right(ls_rc,2) = cn_n[1] Then ls_rc = Left(ls_rc,Len(ls_rc) - 2)
If li_len - li_for <> 6 Or Right(ls_rc,2) <> "亿" Then ls_rc += cn_c[li_len - li_for + 1]
ls_rc += cn_n[1]
ElseIf Right(ls_rc,2) <> cn_n[1] Then
ls_rc += cn_n[1]
End If
Next
If Right(ls_rc,2) = cn_n[1] Then ls_rc = Left(ls_rc,Len(ls_rc) - 2)
If Right(ls_rc,2) = "元" Then ls_rc += "整"
Return ls_rc
pb中将金额转化为人民币大写相关推荐
- 把数字金额转换成人民币大写[原创]
最近在用这个博客,感觉博客园不错,以前用的是新浪的,感觉这个更好,所以好多东西现在转到这边来了. 下面是一个数字转人民币大写的类,不啰嗦了,下面是代码: 1 /**/ /// <summ ...
- 计算机小写换大写函数,在Excel中将金额从小写转换为大写以在Excel RMB中自动将金额大写的三种方法...
一位财务职位的合伙人之前曾问过小雅这个问题. 在工作中,她经常用中文大写填写金额. 如果将大写字母的数字一一填写,这将很耗时且费力,而且事半功倍. 并且面对大量数据,它效率低下并且容易出错. 今天,小 ...
- php人民币大写函数,将人民币数字转化为人民币大写格式的PHP函数
这个函数用来把人民币数字转换为人民币大写格式,这个函数感觉还可以.要的拿去吧. function toCNFormat($data) { $data = strpos($data, ".&q ...
- php将数字转换人民币显示,php数字转化为人民币大写
15) { return "金额太大"; die(); } if ($c = strpos($num, '.')) {//有小数点,$c为小数点前有几位 $len=strlen($ ...
- 将输入金额转化为发票大写形式
package test; import java.util.Scanner; /* * 3.编写程序将表示钱数的数字转换为大写形式,例如:1200.53 壹仟贰佰零元伍角三分: */ publi ...
- 超实用:数字金额转成人民币大写
public static String arabiaToChinese(String number){if(isBlank(number)){return "零";}if(!is ...
- 2-34 中文大写金额。声明RMB人民币类如下,实现其中成员方法。public class rMB // 人民币类 {// 返回金额x的中文大写形式字符串,如x=123 45,转化为“壹佰贰拾
1.实验题目: 2-34 中文大写金额. 声明RMB人民币类如下,实现其中成员方法. public class rMB // 人民币类 { // 返回金额x的中文大写形式字符串,如x=123 45,转 ...
- java 数字转化为汉字_工具类_java 数字转化为汉字大写
public class Num2Rmb { private String[] hanArr = { "零", "壹", "贰", &quo ...
- Vue.js阿拉伯数字转化成人民币的中文
// 数字金额转化成人民币的中文 export function numberToChinese(money) {//汉字的数字var cnNums = new Array("零" ...
最新文章
- Apache简单配置(4)搭建Discuz 7.0.0论坛
- java-forkjoin框架的使用
- 【Linux入门连载三】Linux常用的基本命令
- Android 实训日志:基于外部存储的音乐播放器V03
- wxWidgets:wxRegKey 类演示
- python数据可视化源码_Python数据分析:基于Plotly的动态可视化绘图 随书源码[101MB]...
- a critical review of preetham skylight model 笔记
- 爱奇艺体育:体验Serverless极致扩缩容,资源利用率提升40%
- ORACLE 日期加减操作
- springboot 全局捕获异常
- C数组 奇偶分开,奇前偶后
- 数据预处理01_脏数据产生的原因
- jQuery视频展示效果实例
- 电动车登记上牌系统源码免费分享
- 可汗学院公开课:统计学笔记——线性回归、卡方分布、方差分析
- 基于php的学生公寓管理系统,php毕业设计学生公寓管理系统
- 基于DS18B20数字温度传感器的温度计设计
- SQL优化的魅力!从 30248s 到 0.001s
- Rstudio Markdown中文输出PDF文件
- 免费数据上新 | CnOpenData中国上市公司信息披露评分数据