Question

dim a Private Sub Command1_Click() text1.text=a End Sub

当a=0.002时，text1中显现的是 .002
如果上面改成 text1.text=str（a） text1中显现的也是 .002
怎么让text1中显现0.002
dim a
Private Sub Command1_Click()
text1.text=a
End Sub

Answer 1

a = 0.002
Text1.Text = Format(a, "0.000")
当然 只能显示到小数点后三位。如果有其他需求另外说。

Answer 2

到教程上看看，有类似题目