2020
10-10
10-10
ASP将数字转中文数字(大写金额)的函数
下面跟大家分享2种不同函数的实现方式。ASP将数字转中文数字金额的函数一<%functionMoney(thenumber)'dimMoney,i,String1,String2,length,checkp'定义变量dimone(),onestr()'定义数组String1="零壹贰叁肆伍陆柒捌玖"String2="万仟佰拾亿仟佰拾万仟佰拾元角分厘毫"checkp=instr(thenumber,".")'判断是否含有小数位ifcheckp<>0thenthenumber=replace(thenumber,".","")'去除小数位endiflength=len(thenumber)'取得数...
继续阅读 >