yujn_1 发表于 2002-12-5 18:27:00

如何将类似 ".5"数值改为"0.5"显示

leeyeafu 发表于 2002-12-6 08:12:00

这是我写的一个程序片断，你看是否合适

Private Function f(str As String) As String
If IsNumeric(str) Then
If Val(str) < 1 And Val(str) > 0 Then f = "0" & Trim(str) Else f = Trim(str)
Else
f = str
End If
End Function
我曾经这样写上面的函数：
Private Function f(str As String) As String
If Left(str,1)="." And IsNumeric(str) Then f="0" & str Else f=str
End Function

efan2000 发表于 2002-12-7 18:33:00

Re:如何将类似 ".5"数值改为"0.5"显示

在VB中可直接用Format函数。
如：保存小数点后两位，可以用Format(1.23456,".00")=1.23，
如果点号之前补零的话，只要Format(0.23456,"0.00")=0.23。

pbh1974 发表于 2002-12-30 11:14:00

用函数"format(aaa,"0.00")"即可

你的方法太复杂，将数字转换成字符串时用函数"format(aaa,"0.00")"即可

zhuqi75 发表于 2003-1-23 11:22:00

使用format加以格式话

使用format加以格式话
页: [1]
查看完整版本: 如何将类似 ".5"数值改为"0.5"显示