高清  屏蔽  站长  IF  后期  获得  工具  空格

您所在的位置:小祥子 » 编程 » ASP » 正文

ASP格式化价格函数

时间:2015-03-03 编辑:本站 来源:本站原创

价格一般是XX.XX这种格式,并且不能为空。

Function ToPrice(num)
    If num = "" Or IsNull(num) Then num = 0
    ToPrice = FormatCurrency(num, 2, -1, 0, -1)
End Function

Function FormatPrice(t)
    On Error Resume Next
    t = CDbl(t)
    If Abs(t)<1 Then
        FormatPrice = FormatNumber(t, 2, -1, 0, -1)
    Else
        FormatPrice = FormatNumber(t, 2,-1, 0, 0)
    End If
End Function
 

关键词:ASP 格式化 函数