专注于互联网--专注于架构

最新标签
网站地图
文章索引
Rss订阅
  功能将小于十万亿元小写金额转换为大写  代码  CODE:  def IIf( b, s1, s2):   b:     s1  :     s2def num2chn(nin=None):    cs =('零','壹','贰','叁','肆','伍','陆','柒','捌','玖','◇','分','角','圆','拾&# [阅读全文] [PDF]
<%\'****人民币大小写转换格式****dim str(9)str(0)=\"零\"str(1)=\"壹\"str(2)=\"贰\"str(3)=\"叁\"str(4)=\"肆\"str(5)=\"伍\"str(6)=\"陆\"str(7)=\"柒\"str(8)=\"捌\"str(9)=\"玖\"aa=Request.form(\"source\")hh=formatnumber(aa,2,-1)aa=replace(hh,\".\",\"\")aa=replace(aa,\",\",\"\")for i=1 to len(aa) s=mid [阅读全文] [PDF]
1 共2条 分1页