VB语言用Pest方法画阿基米德螺线
工具/原料
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,双击窗体阿基米德螺线就画成了