VB 直线连接 点For x = 0 To 360 Step 10x = xy = x - ap1.line(x,y)-(x+10,?)?如何写?应该是For x = 0 To 360 Step 10x = xy = x - aP1.PSet (x, y), vbRedp1.line(x,y)-(x+10,?)
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/26 22:18:35
VB直线连接点Forx=0To360Step10x=xy=x-ap1.line(x,y)-(x+10,?)?如何写?应该是Forx=0To360Step10x=xy=x-aP1.PSet(x,y),v
VB 直线连接 点For x = 0 To 360 Step 10x = xy = x - ap1.line(x,y)-(x+10,?)?如何写?应该是For x = 0 To 360 Step 10x = xy = x - aP1.PSet (x, y), vbRedp1.line(x,y)-(x+10,?)
VB 直线连接 点
For x = 0 To 360 Step 10
x = x
y = x - a
p1.line(x,y)-(x+10,?)
?如何写?
应该是
For x = 0 To 360 Step 10
x = x
y = x - a
P1.PSet (x, y), vbRed
p1.line(x,y)-(x+10,?)
VB 直线连接 点For x = 0 To 360 Step 10x = xy = x - ap1.line(x,y)-(x+10,?)?如何写?应该是For x = 0 To 360 Step 10x = xy = x - aP1.PSet (x, y), vbRedp1.line(x,y)-(x+10,?)
要画直线吗?这样的话,就花了一条y = x - 10直线
For x = 0 To 360 Step 10
y = x - 10
P1.PSet (x, y), vbRed
Next x
但是如果窗体的ScaleMode属性为Twips,则步长选15较好,15twips为一个像素,如果是Pixel,则步长就1就行了.