3、下列程序代码有几处错误,请指出；（20分）Dimx,ySinglePicture1.Scale(-10,25)-(10,-25)Picture1.Line(10,0)-(10,0),RGB(0,0,255)Picture1.Line(0,25)-(0,-25),RGB(0,0,255)Forx=-10To100.0001y=x^2Picture1.PSet(x,y),RG

Question

3、下列程序代码有几处错误,请指出；（20分） Dim x,y Single Picture1.Scale (-10,25)-(10,-25) Picture1.Line (10,0)-(10,0),RGB(0,0,255) Picture1.Line (0,25)-(0,-25),RGB(0,0,255) For x = -10 To 10 0.0001 y = x ^ 2 Picture1.PSet (x,y),RGB(255,0,0) Nextx

Answer 1

Dim x, y Single 这里有错要加as 即 Dim x, y as Single后面的For x = -10 To 10 0.0001这段语句中也出现了错误即插step,应该为For x = -10 To 10 step 0.0001还有就是Picture1.Line (10, 0)-(10, 0), RGB(0, 0, 255).这个(10, 0)-(10, 0),是话一个点应该没有什么问题,但是如果线的话那就有错.好象没有了就这些楼主给分.