这个是很早之前用C语言实现的人民币小写转大写的方法

/****************************************************************************

*

* 函数名称:

* 功能描述: 将用阿拉伯数字表示的金额转换为用中文大写数字表示。

* 金额范围：-9999999999999999.99 —— 9999999999999999.99

数量级： 千万亿

精确值： 小数点后两位

* 输入参数: 阿拉伯数字表示的金额

*

* 输出参数: 中文大写数字表示的金额

* 返 回 值:

*

*

***************************************************************************

* Who Date Action Memo

* ChengCheng2011-07-20cc@tkc8.com

***************************************************************************

* TIP: C-Create M-Modify

***************************************************************************/

/*---------------------------- 头文件定义 ------------------------*/

#include

#include

#include

#include

/*--------------------------- 头文件定义结束 -------------------------*/

/*------------------------ 以下内容相关函数定义 ------------------------*/

#defineMAX_SMALL_AMOUNT_LEN 19

#defineSMALL_AMOUNT_LEN MAX_SMALL_AMOUNT_LEN

#define SMALL_PART_LEN 2

#defineBIG_AMOUNT_LEN 128

#defineONE_WORD_LEN 2

/*------------------------ 以上内容相关函数定义 ------------------------*/

/*

*去空格

*/

void amount_trim ( char *s, char Mode )

{

int i ;

char *p ;

if ( s == NULL )

{

return ;

}

if ( strlen ( s ) == 0 )

{

return ;

}

p = s ;

switch ( toupper ( Mode ) )

{

case 'A':

case 'L':

while ( *p==' ' || *p== '\t' ) p++ ;

strcpy ( s , p ) ;

if(toupper ( Mode )== 'L' ){break ;}

case 'R':

while ( ( strlen ( s ) >= 1 ) &&

( ( s [ strlen ( s ) - 1 ] == ' ' ) ||

( s [ strlen ( s ) - 1 ] == '\t' ) ) )

s [ strlen ( s ) - 1 ] = 0x00 ;

break ;

}

return ;

}

/*

* 检查金额的有效性

*/

int amount_is_valid( char *buffer, int len )

{

long ll_loop = 0;

intli_dots = 0;

/* --判断输入参数的有效性，如果输入参数不合法，则视为金额无效-- */

if( buffer == NULL || len <= 0 )

{

return( 0 );

}

else

{

for( ll_loop = 0; ll_loop < len; ll_loop++ )

{

if( ll_loop == 0 && buffer[ ll_loop ] == '-' )

{

continue;

}

if( buffer[ ll_loop ] == '.' )

{

li_dots++;

}

if(( buffer[ ll_loop ] < '0' || buffer[ ll_loop ] > '9' ) && buffer[ ll_loop ] != '.' )

{

return( 0 );

}

}

}

if( li_dots >= 2 )

{

return( 0 );

}

return( 1 );

}

/*

*转换成大写

*/

char * amount_switch_small_to_big( char *szNum )

{

/* --定义-- */

static char CapsBuf[ 256 ];

char buf[ SMALL_AMOUNT_LEN + 1 ];

char str[ BIG_AMOUNT_LEN + 1 ];

char power[ ONE_WORD_LEN + 1 ];

char big[ ONE_WORD_LEN + 1 ];

int position;

int point_pos;

int index;

int f_big;

int f_power;

int is_small_zero;

int i;

/* --初始化-- */

memset(( char * )CapsBuf, 0x00, sizeof( CapsBuf ));

index = 0;

position = 0;

f_big = 0;

f_power = 0;

is_small_zero = 0;

i = 0;

point_pos = MAX_SMALL_AMOUNT_LEN - SMALL_PART_LEN - 1;

memset(( char * )CapsBuf, 0x00, sizeof( CapsBuf ));

memset(( char * )buf, 0x00, sizeof( buf ));

memset(( char * )str, 0x00, sizeof( str ));

memset(( char * )power, 0x00, sizeof( power ));

memset(( char * )big, 0x00, sizeof( big ));

/* --检查输入参数的有效性-- */

if( !szNum || !strlen( szNum ))

{

return( "ERROR" );

}

/* --去空格-- */

amount_trim( szNum, 'A' );

/* --检查金额的有效性-- */

if( !amount_is_valid( szNum, strlen( szNum )))

{

return( "Invalid Amount" );

}

/* --判断是否为负数-- */

if( szNum[ 0 ] == '-')

{

szNum++;

strcpy( CapsBuf, "负");

}

/* -- 格式化 -- */

/* ---- 小数部分格式化 ---- */

/* ------ 找到小数点的位置，如果没有小数点point_pos的值为strlen( buf ) ------ */

point_pos = 0;

while( szNum[ point_pos ] != '.' && ( point_pos < strlen( szNum ) ) )

{

point_pos++;

}

if( point_pos == strlen( szNum ))

{

strcat( szNum, "." );

}

while( strlen( szNum ) - point_pos < SMALL_PART_LEN + 1 )

{

strcat( szNum, "0" );

}

szNum[ point_pos + SMALL_PART_LEN + 1 ] = 0x00;

/*sprintf( stderr, "小数部分格式化后：%s", ( char * )szNum );*/

/* ---- 整数部分格式化 ----*/

/* ------ 去掉小写金额前面可能存在的多余的零 ------ */

i = 0;

while( szNum[ i ] == '0')

{

if( i < strlen( szNum ) && szNum[ i + 1 ] != '.')

{

szNum++;

}else

{

i++;

}

}

/* -- 格式换完毕 --*/

/* -- 输入长度验证 -- */

/*

if( point_pos + SMALL_PART_LEN + 1 < strlen( szNum ) )

{

sprintf( CapsBuf, "小数部分长度超过：%d", SMALL_PART_LEN );

return( CapsBuf );

}

*/

if( point_pos + SMALL_PART_LEN + 1 > MAX_SMALL_AMOUNT_LEN )

{

sprintf( CapsBuf, "整数部分长度超过：%d", MAX_SMALL_AMOUNT_LEN - SMALL_PART_LEN - 1 );

return( CapsBuf );

}

if( szNum[0]=='.' )

{

buf[0] = '0';

}

strcat( buf, szNum );

/************ 执行转换 *******************/

/* -- 循环处理 -- */

point_pos = strlen( buf ) - SMALL_PART_LEN - 1;

i = 1;

while( buf[ point_pos + i ] == '0' )

{

i++;

}

if( i > SMALL_PART_LEN )

{

is_small_zero = 1;

}

position = 0;

index = 0;

while( index < strlen( buf ) )

{

/* 数值位转换阶段 */

switch( buf[ index ] )

{

case '0':

sprintf( big, "零" );

f_power = 1;

f_big = 1;

/* 解决什么时候显示 "零" */

if(( index + 1 ) < strlen( buf ))

{

if( buf[ index + 1 ] != '0' )

{

f_big = 0;

}

}

break;

case '1':

sprintf( big, "壹" );

break;

case '2':

sprintf( big, "贰" );

break;

case '3':

sprintf( big, "叁" );

break;

case '4':

sprintf( big, "肆" );

break;

case '5':

sprintf( big, "伍" );

break;

case '6':

sprintf( big, "陆" );

break;

case '7':

sprintf( big, "柒" );

break;

case '8':

sprintf( big, "捌" );

break;

case '9':

sprintf( big, "玖" );

break;

default:

f_power = 1;

f_big = 1;

break;

}

/* 权位转换阶段 */

switch( point_pos - index )

{

case 13:

case 5:

sprintf( power, "万" );

f_power = 0;

if( buf[ index ] == '0' )

{

f_big = 1;

}

if( point_pos > 8 && point_pos - index == 5)

{

if( buf[ point_pos - 5 ] == '0' && buf[ point_pos - 6 ] == '0'

&& buf[ point_pos - 7 ] == '0' && buf[ point_pos - 8 ] == '0')

{

f_power = 1;

}

}

break;

case 16:

case 12:

case 8:

case 4:

sprintf( power, "仟" );

break;

case 15:

case 11:

case 7:

case 3:

sprintf( power, "佰" );

break;

case 14:

case 10:

case 6:

case 2:

sprintf( power, "拾" );

break;

case 9:

sprintf( power, "亿" );

f_power = 0;

if( buf[ index ] == '0' )

{

f_big = 1;

}

break;

case 1:

sprintf( power, "元" );

if( buf[ index ] == '0' )

{

f_big = 1;

}

/* 解决什么时候不显示"元" */

if( position == 0 && f_big == 1 && !is_small_zero )

{

f_power = 1;

}

else

{

f_power = 0;

}

/* 解决什么时候显示"0" */

if( position == 0 && f_big == 1 && is_small_zero )

{

f_big = 0;

}

break;

case 0:

sprintf( power, "整" );

f_power = 1;

if( is_small_zero )

{

f_power = 0;

}

break;

case -1:

sprintf( power, "角" );

/* 解决什么时候不显示"0" */

if( position == 0 && buf[ index ] == '0')

{

f_big = 1;

}

break;

case -2:

sprintf( power, "分" );

break;

default:

f_power = 1;

break;

}

if(!f_big)

{

str[ position++ ] = big[ 0 ];

str[ position++ ] = big[ 1 ];

}

if(!f_power)

{

str[ position++ ] = power[ 0 ];

str[ position++ ] = power[ 1 ];

}

f_big = 0;

f_power = 0;

index++;

}

/* 循环处理完毕 */

str[ position ] = 0x00;

strcat( CapsBuf, str );

return( CapsBuf );

}

int main()

{

char ch[ 50 ];

fprintf( stderr, "请输入小写金额: " );

fflush( stdin );

gets( ch );

fflush( stdin );

fprintf( stderr, "转换后大写金额: [%s]\n", ( char * )amount_switch_small_to_big( ch ));

return( 0 );

}