如何编程绘制领花

1、启动vb6.0，执行ctrl+n组合键新建工程，在弹出的新建工程对话框中，新建一个标准的exe文件。

3、在窗体上创建picturebox控件，并调整其位置和大小，使其和窗体的布局一致，尽可能的美观。

5、在picturebox控件上面创建两个按钮控件，一个是commmand1一个commmand2，修改commmand的caption属性值为“绘图”，修改commmand2的caption属性值为“退出”，并调整他们的位置。

7、接着输入代码内容：Dim i, r, x, 鲻戟缒男y As SinglePicture1.Scale (-10, 10)-(10, -10)Picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255)Picture1.Line (0, -10)-(0, 10), RGB(0, 0, 255)Picture1.Line (0, 10)-(-0.125, 9.5), RGB(0, 0, 255)Picture1.Line (0, 10)-(0.125, 9.5), RGB(0, 0, 255)Picture1.Line (10, 0)-(9.5, 0.125), RGB(0, 0, 255)Picture1.Line (10, 0)-(9.5, -0.125), RGB(0, 0, 255)For i = -14.5 * 3.1415926 To 14.5 * 3.1415926 Step 0.005r = 2 + 8 * Cos(5 * i)x = r * Cos(i * 1.113)y = r * Sin(i * 1.1133)Picture1.PSet (x, y), RGB(255, 0, 0)Next i

9、再次点击运行按钮进行编译又一次出现了错误，错误提示为缺少表达式，原因是由于保留字书写错误，进行纠正过来。不断的进行调试直至无误为止。

11、在窗体点击绘图按钮，程序就会自动展示绘图的过程，如果要慢一点展示的话，可以把步长设置小一点。