Question

vb编程 小数点前的0不见了

不知道为什么小数点前的0不见了 好几个过程都这样 求大神解答 非常感激





Answer 1

控制面板->区域与语言选项->数字标签，零起始显示，修改为显示0的选项

Answer 2

这是VB系统的默认处理方式。

追问

所以要怎么显示出来呢？

追答

Debug.Print Format(c, "0.##")

Answer 3

debug.print format(c,"#.##")

追问

还是不行。

追答

Private Sub Command1_Click()
Dim n As Single
Dim str1 As String
a = 1
b = 0.1
c = a * b

n = InStr(CStr(c), ".")

If n = 1 Then
str1 = "0" & CStr(c)
End If

Print str1

End Sub