print 小数

Question

dim n as integer
dim e as single
For n = 1 To 4
e=text1.text
Form1.Picture1.Print n * e
当我在textbox输入0.1 不会显示出0.1 ,0.2,0.3,0.4 而是.1,.2,.3,.4 
怎么改才能使之输出0.1 ,0.2,0.3,0.4

Answer 1

Form1.Picture1.Print fromat(n*e,"###0.0")

Answer 2

Private Sub Command1_Click()
    Dim n As Integer
    Dim e As Single
    For n = 1 To 4
        e = Text1.Text
        Form1.Picture1.Print Format(n * e, "0.0")
    Next
End Sub