以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  项目买卖  (http://foxtable.net/bbs/list.asp?boardid=23)
----  统计金额并大写  (http://foxtable.net/bbs/dispbbs.asp?boardid=23&id=183098)

--  作者:青丘狐
--  发布时间:2022/10/24 13:35:00
--  统计金额并大写

入库明细为空也显示金额大写,有时入库明细有数值时不显示大写

 

Dim 金额_大写 As Double = Tables("入库明细").Compute("Sum(含税金额)")
e.Form.Controls("金额大写").value = CUMoney(金额_大写)


图片点击可在新窗口打开查看此主题相关图片如下:金额大写.png
图片点击可在新窗口打开查看

 


图片点击可在新窗口打开查看此主题相关图片如下:金额大写1.png
图片点击可在新窗口打开查看