最近用到了数值转成大写人民币的功能，在网上找了一下只有C＋＋版的，好容易找到一个java版的竟然收费！！没办法就自己弄一个出来，想必用到该功能的人肯定少，就拿出来与大家共享！！
/**
* <p>Title: money</p>
* <p>Description:
* *该类是把阿拉伯数字转换成中文大写的类。根据王大庆兄的C++程序稍做修改而成，后面附有王大庆兄的C++
* *程序，如果对所附的C++程序有什么问题请与王大庆兄联系email: [email protected]
* *如果对java部分有什么看法和建议请与小弟联系，杨璇 email：[email protected]
* *类名：money
* *函数：String PositiveIntegerToHanStr(String NumStr) 负责把小数点前面的数转换为大写中文
* *函数:String NumToRMBStr(double val) 负责把输入的double型的数转换为大写中文
* *注意java程序转换的范围是：小数点前面15位（已测试通过），C＋＋程序是24位（我没有测试）
* </p>
* <p>Copyright: Copyright (c) 2003 你可以对本程序随意修改，复制，使用，但请保留这里注释声明！！！</p>
* <p>Company: </p>
* @author 王大庆、杨璇
* @version 1.0
*/
import java.lang.Math;
public class money{
//调试时用main函数
public static void main(String args[]){
money mon = new money();
System.out.println(-99999999999999.999+mon.NumToRMBStr(-99999999999999.999));
System.out.println(99999999999999.999+mon.NumToRMBStr(99999999999999.999));
System.out.println(mon.NumToRMBStr(100000000.00));
System.out.println(mon.NumToRMBStr(100000001.00));
}
String HanDigiStr[] = new String[]{"零","壹","贰","叁","肆","伍","陆","柒","捌","玖"};
String HanDiviStr[] = new String[]{"","拾","佰","仟","万","拾","佰","仟","亿",
"拾","佰","仟","万","拾","佰","仟","亿",
"拾","佰","仟","万","拾","佰","仟" };
String PositiveIntegerToHanStr(String NumStr)
{ // 输入字符串必须正整数，只允许前导空格(必须右对齐)，不宜有前导零
String RMBStr = "";
boolean lastzero = false;
boolean hasvalue= false; // 亿、万进位前有数值标记
int len,n;
len = NumStr.length();
if( len > 15 ) return "数值过大!";
for(int i=len-1;i>=0;i--) {
if( NumStr.charAt(len-i-1)==' ' ) continue;
n = NumStr.charAt(len-i-1) - '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 = true; // 置万进位前有值标记
}else {
if( (i%8)==0 || ((i%8)==4 && hasvalue) ) // 亿万之间必须有非零值方显示万
RMBStr += HanDiviStr[i]; // “亿”或“万”
}
if( i%8==0 ) hasvalue = false ; // 万进位前有值标记逢亿复位
lastzero = (n==0) && (i%4!=0);
}
if( RMBStr.length()==0 ) return HanDigiStr[0]; // 输入空字符或"0"，返回"零"
return RMBStr;
}
String NumToRMBStr(double val)
{
String SignStr ="" ;
String TailStr ="";
long fraction, integer;
int jiao,fen;
if( val<0 ) {
val = -val;
SignStr = "负";
}
if(val > 99999999999999.999 || val <-99999999999999.999 ) return "数值位数过大!";
// 四舍五入到分
long temp = Math.round(val*100);
integer = temp/100;
fraction = temp%100;
jiao = (int)fraction/10;
fen = (int)fraction%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] + "分";
}
// 下一行可用于非正规金融场合，0.03只显示“叁分”而不是“零元叁分”
// if( !integer ) return SignStr+TailStr;
return "￥"+SignStr+PositiveIntegerToHanStr(String.valueOf(integer) )+"元"+TailStr;
}
}//END public class money
//附王大庆兄的C＋＋的源程序：
//rmb.cpp
/*
#include <vcl.h> // must define AnsiString before rmb.h
#pragma hdrstop // only for C++ Builder
#include <math.h>
#include "rmb.h"
//---------------------------------------------------------------------------
// 常量字符串定义，如修改也可变为转换普通汉字函数（如：一二三，十百千）
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;
}
//下面是rmb.h
#ifndef rmbH
#define rmbH
// for AnsiString def
// #include <vcl.h>
// 数值转大写人民币函数
AnsiString NumToRMBStr(double val);
// 正整数字符串转汉字函数，不建议单独使用
// 输入字符串必须正整数，只允许前导空格(必须右对齐)，不宜有前导零
// AnsiString PositiveIntegerToHanStr(const AnsiString &NumStr);
#endif
//-----------------------------------------------------------
// 基本考虑
// 人民币大写单位银行规定用“元”
// 无零头金额后跟“整”，有则不跟
// 角为零时不写角（如：零叁分）
// 四舍五入到分
// 为减少判读疑惑（一般对大写金额预期较高）和
// 体现人民币基本单位为元，金额低于壹圆前仍加“零元”
// 整数转换
// 若干零后若跟非零值，只显示一个零，否则不显示
// 万(亿)前有零后不加零，因亿、万为一完整单位，
// （如：拾万贰仟 比 拾万零贰仟 更顺些）
// 亿为汉语计数最大单位，只要进位到总是显示（如：壹亿亿）
// 万为次最大单位，亿万之间必须有非零值方显示万
// （如“壹亿”不可显示为“壹亿万”）
//
// 为减少被窜改的可能性，十进位总发壹音，这和下面的习惯读法不一样
// （十进位处于第一位不发壹音，如“拾元”非“壹拾元”，
// 十进位处前有零是否不发壹音不太确定，
// 如“叁仟零壹拾元”还是“叁仟零拾元”？）
// 用“拾万”不用“壹拾万”，因为每个整数进位后都有进位单位（拾佰仟万亿）
// 这样即使金额前没有附防窜改的前缀如“人民币”字样也难窜改些
// 因为至少要加添两个汉字并且改动后数字必须进位才能窜改成
// （如“拾万”可改成“叁拾万”，而“壹拾万”至少要改成“壹佰壹拾万”）
// 此函数为Borland C++ Builder编写，已充分考虑到跨平台兼容性
// 如需转换到其它场合，
// 只需修改字符串类型从AnsiString到对应的类型、功能及函数
// （注意两个char*型字符串不可以直接相加，需有一个先转换）
// public domain freeware by 王大庆 2003年3月-5月 v1.1
// 此函数如有不妥之处请email: [email protected]
*/
本文地址：http://com.8s8s.com/it/it16760.htm