判断一下，如果是负数，先转为正数，再自行CUMoney，如
Dim n = -123
Dim s = IIf(n<0, "负", "") & CUMoney(math.abs(n))
msgbox(s)
加好友 
发短信
Post By：2018/7/20 9:10:00 [显示全部帖子]
