关于小于1的小数显示的问题！！

Question

在listivew中显示一个小于1的小数，显示出来都没有前面的0，比如0.5显示的就是.5。如何搞定这个问题？

Answer 1

Private Sub Form_Load()
Dim a, b, c
a = 1
b = 2
c = Format(a / b, "0.00")
ListView1.ListItems.Add , , c
End Sub

Answer 2

Private Sub Form_Load()
Dim num As Single
num = 0.5
Text1.Text = Format(num, "###0.######")
End Sub
listivew没用过text可以

Answer 3

Private Sub Form_Load()
Dim num As Single
num = Format(0.5, "####0.#######")
ListView1.ListItems.Add , , num
End Sub