Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!
共11 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题：金额大写代码有误,请查看!
11楼
woodiy 发表于：2009/2/14 20:28:00
以下是引用don在2009-2-13 17:01:00的发言：
我的不存在:如果是整数型金额,大写的时候,出来的是"圆零",而不是"圆整"现象!

if e.datacol.name="合计金额" then
    Dim m  As  Double =  e.datarow("合计金额")
    Dim T As String = m
    e.datarow("大写")=CUMoney(m) & iif(right(T,2).Indexof(".")>-1,"整","")
end if


以上的代码完成有效,谢谢!

共11 条记录, 每页显示 10 条, 页签: [1] [2]
Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .01953 s, 2 queries.