Foxtable(狐表)用户栏目专家坐堂 → piao据套打


  共有2179人关注过本帖树形打印复制链接

主题:piao据套打

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


加好友 发短信
等级:三尾狐 帖子:672 积分:7909 威望:0 精华:0 注册:2016/6/11 11:10:00
piao据套打  发帖心情 Post By:2019/3/21 16:08:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:image 1.jpg
图片点击可在新窗口打开查看


举例:小写合计绑定为123456.78,那么十万位的Label5取1(需转换大写:壹),万位的Label6取2(需转换大写:贰),.....依次类推
最后显示为: 分  小写¥ 123456.78
再举例:1.2,最后显示为: 拾  万  仟  佰  拾 壹 元  角  分  小写¥ 1.20 元
请问老师DataFormat的代码如何写?
以Label5为例:
e.Text =CUNumber( GetDigit(e.Value,6,"零"))为什么不行?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/3/21 17:01:00 [只看该作者]

参考代码

 

Dim n = 123456.78
msgbox(CUNumber(GetDigit(n,6,"0")))


 回到顶部