Foxtable(狐表)用户栏目专家坐堂 → piao据套打中金额大写套打好麻烦,有没简单点的?


  共有20478人关注过本帖平板打印复制链接

主题:piao据套打中金额大写套打好麻烦,有没简单点的?

帅哥哟,离线,有人找我吗?
菜鸟foxtable
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 菜鸟中的老鸟
等级:七尾狐 帖子:1486 积分:10064 威望:0 精华:9 注册:2008/11/14 8:54:00
piao据套打中金额大写套打好麻烦,有没简单点的?  发帖心情 Post By:2009/2/3 21:27:00 [只看该作者]

大家可以看到金额大写栏,原本是有万仟佰拾元角分这些字的.
示例中提供了大写转换

CUMoney

将阿拉伯数字转换为中文货币格式。

语法

CUMoney(Value)

Value:要转换的阿拉伯数字。

例如:

Dim Currency as String
Currency = CUMoney(
12345.12
)
Output.Show(Currency)

输出为:壹万贰千叁佰肆拾伍圆壹角贰分


我用的笨办法,把合计小写金额每一位数设定一个对应列,然后进行套打.有没简单点的办法?


  合计   万  仟    佰    拾    元    角    分           
   12345.12  壹     贰     叁   肆     伍    壹    贰        


图片点击可在新窗口打开查看此主题相关图片如下:住院fa piao.jpg
图片点击可在新窗口打开查看

 回到顶部