- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- piao据套打 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=132421)
-- 发布时间：2019/3/21 16:08:00
-- piao据套打
此主题相关图片如下：image 1.jpg
举例：小写合计绑定为123456.78，那么十万位的Label5取1（需转换大写：壹），万位的Label6取2（需转换大写：贰），.....依次类推
最后显示为：壹 拾 贰 万 叁 仟 肆 佰 伍 拾 陆 元 柒 角 捌 分 小写￥ 123456.78 元
再举例：1.2，最后显示为：零 拾 零 万 零 仟 零 佰 零 拾 壹 元 贰 角 零 分 小写￥ 1.20 元
请问老师DataFormat的代码如何写？
以Label5为例：
e.Text =CUNumber( GetDigit(e.Value,6,"零"))为什么不行？
-- 发布时间：2019/3/21 17:01:00
--
参考代码
Dim n = 123456.78
msgbox(CUNumber(GetDigit(n,6,"0")))