改进一下,去掉没用的0 让结果分别是 5和3.5
复制代码 代码如下:
function fm(nb)
if isnumeric(nb) then
dim a
a=formatnumber(nb,2,-1)
if right((a+""),2)=00 then
fm=clng(a)
else
fm=formatnumber(nb,1,-1)
end if
else
fm=0
end if
end function
【说明】：本文章由站长整理发布，文章内容不代表本站观点，如文中有侵权行为，请与本站客服联系(QQ:)！