-
vb 分形树
Dim xs As Integer
Dim ys As Integer
Dim alph As Single
Dim lng As Single
Dim m As Integer
Const PI As Single = 3.14159265
Private Function tree(x As Integer, y As Integer, angle As Single, length As Single, n As Integer)
Dim x0 As Integer
Dim y0 As Integer
Dim alpha As Single
Dim beita As Single
Dim leng As Single
BackColor = vbWhite
If n > 0 Then
x0 = x + Cos(angle) * length
y0 = y - Sin(angle) * length
picture1.Line (x, y)-(x0, y0), vbbrake
alpha = angle - PI / 8
beita = angle + PI / 8
leng = 2 * length / 3
Call tree(x0, y0, alpha, leng, n - 1)
&nbs
- 2022-01-24 19:06:52下载
- 积分:1
-
用单片机制作的高精度计数器,验证通过,适用于计数场合。...
用单片机制作的高精度计数器,验证通过,适用于计数场合。-Produced using high-precision single-chip counters, authentication is passed, apply to count occasions.
- 2022-11-01 23:40:03下载
- 积分:1
-
work2
有五个学生,每个学生有3门课的成绩,从键盘输入以上数据(包括学生号,姓名,三门课成绩),计算出平均成绩,况原有的数据和计算出的平均分数存放在磁盘文件"stud"中。(There are five students, each student has three classes of results, more than from the keyboard input data (including student number, name, class 3 results), calculated the average performance, the status of the original data and calculated the average score placed disk file in the " stud" in.)
- 2009-05-12 19:40:59下载
- 积分:1
-
这是我们实习的源代码,是我们老师提供的,希望对大家有所帮助。呵呵,你们认为呢?...
这是我们实习的源代码,是我们老师提供的,希望对大家有所帮助。呵呵,你们认为呢?-This is our attachment to the source code, is provided by the teachers, we hope to help. Oh, do you think?
- 2023-07-28 08:30:04下载
- 积分:1
-
这个汇编程序可以显示ASC码,你可以学会如何显示字符…
this ASSEMBLY programme could show ASC codes ,you can leran how to show chars on display
- 2022-05-18 09:53:29下载
- 积分:1
-
This is a simple address book program, very suitable for novices to learn from.
这是一个简单的地址簿程序,非常适合新手学习和借鉴。-This is a simple address book program, very suitable for novices to learn from.
- 2022-03-13 07:41:06下载
- 积分:1
-
128* 160 LCD procedures. The program driver chips are 89C51.
128*160液晶显示程序.该程序驱动芯片是89C51.-128* 160 LCD procedures. The program driver chips are 89C51.
- 2022-05-06 20:13:22下载
- 积分:1
-
用汇编语言实现的一个简单的学生档案的管理系统,式界面操作的,通过鼠标的山下左右键来选择相应的菜单了执行操作。...
用汇编语言实现的一个简单的学生档案的管理系统,式界面操作的,通过鼠标的山下左右键来选择相应的菜单了执行操作。-assembly language of a simple student records management system interfaces to operate, through the mountains around the mouse button to select the menu for the corresponding execution.
- 2022-03-22 05:18:19下载
- 积分:1
-
应用Bresenham法画直线的算法,的汇编程序。
应用Bresenham法画直线的算法,的汇编程序。-application of Bresenham draw line
- 2022-03-23 17:25:09下载
- 积分:1
-
汇编语言实例 好的很!
汇编语言实例 好的很!-assembly language is a good example!
- 2022-02-28 19:53:55下载
- 积分:1