VB语言画阿基米德螺线

1、打开VB软件

2、新建一个工程

3、编写代码

4、Const pi As Single = 3.14，定义常量pi为π

5、Dim a, x, y As SingleForm1.ScaleLeft = -50: Form1.ScaleTop = -50: Form1.ScaleWidth = 100: Form1.ScaleHeight = 100，是重设坐标系

6、For a = 0 To 8 * pi Step 0.01，a从0开始在【0,8π】范围内以步长0.01参与循环

7、按F5，双击窗体阿基米德螺线就画成了