你帮我看看这句话有错么

你帮我看看这句话有错么
Dim ,,
Form2.Picture1.Scale (-10,3)-(300,-0.2)
Form2.Picture1.Line (-3,0)-(300,0) 'X
Form2.Picture1.Line (0,3)-(0,0) 'Y
For i = 0 To 300 Step 25 'X轴坐标
Form2.Picture1.Line (i,0.1)-(i,0)
Form2.Picture1.Print i
Next i
For i = 0.1 To 3 Step 0.1 'Y轴坐标
Form2.Picture1.Line (0,i)-(5,i)
Form2.Picture1.Print Format(i,"0.0")
Next i