字符显示格式问题

[My_first]

如何将数字
.5
1
-2
-3.1
显示为
0.50
1.00
-2.00
-3.10

带有2位小数位

[littlelam]

function FormatNum(str,length)
str=FormatNumber(str,length)
if instr(str,".")=1 then
str=0&str
end if
if instr(str,"-.")=1 then
str="-0."&right(str,length)
end if
FormatNum=str
end function

[littlelam]

FormatNumber(1298.873945,2)