以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 请教负数转换成大写的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=122166) |
-- 作者:hopestarxia -- 发布时间:2018/7/20 9:00:00 -- 请教负数转换成大写的问题 老师:做的一个单据窗口,其中某一TextBox插件的内容是数字,在其属性的大小写转换里选择了“Normal”,当其值是正数时,能正常转换; 但是其值为负数时,则转换不出来了,直接成了“元整”,请问些处如何解决?谢谢!
|
-- 作者:有点甜 -- 发布时间:2018/7/20 9:10:00 -- 判断一下,如果是负数,先转为正数,再自行CUMoney,如
Dim n = -123 Dim s = IIf(n<0, "负", "") & CUMoney(math.abs(n)) msgbox(s) |
-- 作者:hopestarxia -- 发布时间:2018/7/25 9:49:00 -- 谢谢老师 |