Question

关于vb划线的问题

Private Sub Form_Load()
Dim i, x, y
With Picture1
.ScaleHeight = 200
.ScaleWidth = 360
.ForeColor = 0
.AutoRedraw = True
End With
Picture1.PSet (0, 100)
For i = 0 To 72
x = i * 5
y = 100 + 80 * Sin(x * 3.14 / 180)
Picture1.Line =-(x,y) -------此处总是提示,号错误为什么呀？？？？？？请指教

Next

Picture1.AutoRedraw = False

End Sub
照着书上输入的但是不对，总是提示，号错误

Answer 1

试一试:
Private Sub Form_Load()
Dim i, x, y
With Picture1
.ScaleHeight = 200
.ScaleWidth = 360
.ForeColor = 0
.AutoRedraw = True
End With
Picture1.PSet (0, 100)
For i = 0 To 72
x = i * 5
y = 100 + 80 * Sin(x * 3.14 / 180)
Picture1.Line -(x, y)
Next
Picture1.AutoRedraw = False
End Sub
已经运行过。
其实就把Picture1.Line =-(x,y)中等于号去掉了，改成了：Picture1.Line -(x, y)
因为这是VB语言的语法要求，没有其它理由。

实质不是“，”号错误，而是你多打了一个“＝”号。
如果同学你是按照书上打的，那么，很遗憾的告诉你，那本书上印错了......

Answer 2

Picture1.Line (0, 0)-(x, y)
意思是点到点划线 ，你没有起点