access数据库中如何实现金额数字大小写转换如何实现
5个回答
2013-09-18
展开全部
以下代码可以实现你说的功能,如下:
Function CaseMoney &&Edit By daly
PARA Money
*辨别是否是数字金额
IF TYPE("Money") #"N"
=messagebox(" 金额类型出错",0,_screen.caption)
Return " "
EndIF
*转换金额为字符型
IF Money>9999999999999.99
=messagebox(" 数值太大,无法处理",0,_screen.caption)
Return " "
EndIF
CMoney=Allt(Str(Money,16,2))
Function CaseMoney &&Edit By daly
PARA Money
*辨别是否是数字金额
IF TYPE("Money") #"N"
=messagebox(" 金额类型出错",0,_screen.caption)
Return " "
EndIF
*转换金额为字符型
IF Money>9999999999999.99
=messagebox(" 数值太大,无法处理",0,_screen.caption)
Return " "
EndIF
CMoney=Allt(Str(Money,16,2))
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-09-18
展开全部
楼主是用access做
还是用
其他的工具去处理然后存放到里面了
还是用
其他的工具去处理然后存放到里面了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-09-18
展开全部
不知道楼主的意思是不是说把“1”变成“壹”,是的话就写个函数替换一下就行了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-09-18
展开全部
你是说把数字用大写的表示吗 这好像没的啊
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-09-18
展开全部
你没必要在access中实现那个功能啊,你可以借助前台的开发工具实现啊
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询