多语言展示
当前在线:1574今日阅读:91今日分享:37

VB语言画阿基米德螺线

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,双击窗体阿基米德螺线就画成了

推荐信息