lua脚本金额小写转化大写!
lua吧
全部回复
仅看楼主
level 1
我了擦8 楼主
function Format(szNum)
local szChMoney = ""
local iLen = 0
local iNum = 0
local iAddZero = 0
local hzUnit = {"", "拾", "佰", "仟", "万", "拾", "佰", "仟", "亿", "拾", "佰", "仟", "万", "拾", "佰", "仟"}
local hzNum = {"零", "壹", "贰", "叁", "肆", "伍", "陆", "柒", "捌", "玖"}
if nil == tonumber(szNum) then
return '请输入金额'
end
iLen =string.len(szNum)
if iLen > 15 or iLen == 0 or tonumber(szNum) < 0 then
return "请输入金额"
end
local i = 0
for i = 1, iLen do
iNum = string.sub(szNum,i,i)
if iNum == 0 then
iAddZero = iAddZero + 1
else
if iAddZero > 0 then
szChMoney = szChMoney..hzNum[1]
end
szChMoney = szChMoney..hzNum[iNum + 1] --//转换为相应的数字
iAddZero = 0
end
if iNum ~=0 or iLen-i==3 or iLen-i==11 or ((iLen-i+1)%8==0 and iAddZero<4) then
szChMoney = szChMoney..hzUnit[iLen-i+1]
end
end
return szChMoney.."圆"
end
请教大神以上的支持整数输入,怎么改可以支持小数后两位,支持角和分??
2017年01月06日 05点01分 1
level 7
取对应的位…
2017年01月17日 00点01分 2
1