-
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
-
Dos下屏蔽热启动,想要重启的话先按下Ctrl+Alt+Del，松开Del键，然后按R键则重 启，按Q键则关机...
Dos下屏蔽热启动,想要重启的话先按下Ctrl+Alt+Del，松开Del键，然后按R键则重 启，按Q键则关机-Dos under thermal shielding started, and wanted to resume the first pressing Ctrl-Alt-Del, loosen Del keys, then R button will resume by Q keys were shutdown
- 2023-08-05 10:10:03下载
- 积分：1
-
设计要求：
出于不同目的的旅客对交通工具有不同的要求.例如,因公出差的旅客希望在旅途中的时间尽可能短,出门旅游的游客则期望旅费尽可能省,而老年旅客则要求中...
设计要求：
出于不同目的的旅客对交通工具有不同的要求.例如,因公出差的旅客希望在旅途中的时间尽可能短,出门旅游的游客则期望旅费尽可能省,而老年旅客则要求中转次数最少.编制一个全国城市间的交通咨询程序,为旅客提供两种或三种最优决策的交通咨询.
//请保留此信息，谢谢
1.需求分析:
(1)提供对城市信息进行编辑(如添加或删除)的功能.
(2)城市之间有两种交通工具:火车和飞机.提供对列车时刻表和飞机航班进行编辑(增设或删除)的功能.
(3)提供两种最优决策:最快到达或最省钱到达.全程只考虑一种交通工具.
-design requirements : For different purposes to transport passengers have different requirements. For example, on official business travelers in the journey time as short as possible away tourists expect possible travel provinces, and elderly passengers asked the least number of transit. establishment of a national inter-city traffic advisory proceedings, for the visitors two or three best decision of the Transport Advisory.// Please keep this information, I would like to thank one. demand analysis : (1) to provide information on the city for editing (such as add or delete) function. (2) Town between the two modes : Train and aircraft. Schedules for the train and flights for editing (created or deleted) function. (3)
- 2022-03-23 02:35:30下载
- 积分：1
-
有趣的心形动画源程序！
有趣的心形动画源程序！-interesting heart-shaped animation source!
- 2022-03-20 07:55:45下载
- 积分：1
-
循环冗余校验与编译实现（计算机网络…
crc循环冗余校验用汇编实现（计算机网络作业）-crc cyclic redundancy check with the compilation of implementation (computer network operations)
- 2023-07-15 12:00:03下载
- 积分：1
-
和量度暗无天日是非曲直蝇理工科 量度 量度
和量度暗无天日是非曲直蝇理工科 量度 量度 -And complete darkness to measure the merits of science and engineering measure to measure fly
- 2022-07-07 05:40:43下载
- 积分：1
-
prepared with the message boards, good Dongdong
用java编写的留言版，很好的-prepared with the message boards, good Dongdong
- 2022-02-05 09:10:32下载
- 积分：1
-
bootsect print red p on the screen follow the book written by yuan yu
bootsect 在屏幕上打印p 仿于渊的那本自己动手写操作系统-bootsect print red p on the screen follow the book written by yuan yu
- 2022-01-30 17:21:48下载
- 积分：1
-
This is a master simple calculator written in assembler! !
这是一个用汇编语言编写的简单计算器！
- 2022-04-06 21:36:39下载
- 积分：1
-
汇编语言求解八皇后问题
汇编语言递归求解八皇后问题，使用栈空间，递归求解。递归调用子函数---PlaceQueue
- 2022-08-18 11:33:47下载
- 积分：1
