Office中国论坛/Access中国论坛

标题: 求大写金额转小写金额的函数 [打印本页]

作者: ljy6963 时间: 2007-7-19 19:06
标题: 求大写金额转小写金额的函数
我单位原来数据库是大写金额，现想转一次性换成小写金额，恳请给个函数给我，谢谢！

作者: 谢健 时间: 2007-7-19 19:18
没有这个函数，要用很长的代码来实现。

作者: 方漠 时间: 2007-7-20 01:01
<

>可以考虑用REPLACE函数写个,提示如下:
<

>Function ChangeNo(StrNo As String) As String
<

>StrNo = Replace(StrNo, "壹", "1") StrNo = Replace(StrNo, "贰", "2") '........
End Function

作者: hi-wzj 时间: 2007-7-20 22:46
不行的,因为会有"壹千元整"这样的数据出现

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)