本帖最后由 pobopo 于 2014-8-23 04:20 编辑
scjd 发表于 2011-12-21 16:41
我现在改成这个了,哈哈
IF(left(MFCNUM($MF(金额)$),1)="拾","壹"&if(mfisnull(find(".",mfcnum($MF(金 ...
SUBSTITUTE(SUBSTITUTE(IF(left(MFCNUM($MF(金额)$),1)="拾","壹"&if(mfisnull(find(".",mfcnum($MF(金额)$))),MFCNUM($MF(金额)$)&"元正",if(and(find(".",mfcnum($MF(金额)$))<>0,len(mid(mfcnum($MF(金额)$),find(".",mfcnum($MF(金额)$))+1,2))=2,left(right(mfcnum($MF(金额)$),2),1)="零"),mid(mfcnum($MF(金额)$),1,find(".",mfcnum($MF(金额)$))-1)&"元"&right(mfcnum($MF(金额)$),2)&"分",if(and(find(".",$MF(金额)$)<>0,len(mid(mfcnum($MF(金额)$),find(".",mfcnum($MF(金额)$))+1,2))=2,left(right(mfcnum($MF(金额)$),2),1)<>"零"),mid(mfcnum($MF(金额)$),1,find(".",mfcnum($MF(金额)$))-1)&"元"&left(right(mfcnum($MF(金额)$),2),1)&"角"&right(mfcnum($MF(金额)$),1)&"分",mid(mfcnum($MF(金额)$),1,find(".",mfcnum($MF(金额)$))-1)&"元"&right(mfcnum($MF(金额)$),1)&"角正"))),if(mfisnull(find(".",mfcnum($MF(金额)$))),MFCNUM($MF(金额)$)&"元正",if(and(find(".",mfcnum($MF(金额)$))<>0,len(mid(mfcnum($MF(金额)$),find(".",mfcnum($MF(金额)$))+1,2))=2,left(right(mfcnum($MF(金额)$),2),1)="零"),mid(mfcnum($MF(金额)$),1,find(".",mfcnum($MF(金额)$))-1)&"元"&right(mfcnum($MF(金额)$),2)&"分",if(and(find(".",$MF(金额)$)<>0,len(mid(mfcnum($MF(金额)$),find(".",mfcnum($MF(金额)$))+1,2))=2,left(right(mfcnum($MF(金额)$),2),1)<>"零"),mid(mfcnum($MF(金额)$),1,find(".",mfcnum($MF(金额)$))-1)&"元"&left(right(mfcnum($MF(金额)$),2),1)&"角"&right(mfcnum($MF(金额)$),1)&"分",mid(mfcnum($MF(金额)$),1,find(".",mfcnum($MF(金额)$))-1)&"元"&right(mfcnum($MF(金额)$),1)&"角正")))),"零元零",""),"零元","")
|