- --文字转换
- function Bank:numberToString(szNum)
- local szChMoney = ""
- local szNum = 0
- local iLen = 0
- local iNum = 0
- local iAddZero = 0
- local hzUnit = {"", "拾", "佰", "仟", "万", "拾", "佰", "仟", "亿", "拾", "佰", "仟", "万", "拾", "佰", "仟"}
- local hzNum = {"零", "壹", "贰", "叁", "肆", "伍", "陆", "柒", "捌", "玖"}
- if nil == tonumber(szNum) then
- return '错误的数字'
- end
- szNum = '10000001'
- 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
大小写转化()
猜你喜欢
转载自blog.csdn.net/qq_40708273/article/details/78981757
今日推荐
周排行