致新手:用VB6解决一些有趣的问题(五)
来源:互联网 发布:天猫美工教程 百度云 编辑:程序博客网 时间:2024/05/20 18:48
下面,我们来设计一个强悍的程序
嘿嘿,程序设计起码要这样才有点意思嘛
我们在Picture上画一个三角形,这下可不是Print一堆字符了
我们必须要先算出三角形的 三个顶点 然后连线
比如三角形 ABC三点 我们以A作为坐标原点,对应Picture的中心
我们用X,Y来计算坐标和Picture上坐标的偏移量,A为(0,0)
如果AB长为a 沿着X轴,那么B点的坐标是(a,0)
现在来算C点,根据余弦定理有
'c^2=a^2+b^2-2*a*b*CosC
'CosC=(a^2+b^2-c^2)/2ab
别烦恼了,我数学也马虎,余弦定理难算,我们就来个简单的
(聪明的程序员会千方百计设计出程序)
以A为圆心 AC长(c)为半径的园 X^2+Y^2 = c^2
以B为圆心 BC长(b)为半径的园 (X-a)^2+Y^2=b^2
C点为两个圆的交线,所以两个方程,两个未知数,注意有两个交点哦
(隐隐感觉到 这个就是余弦定理) 解出
2*a*X=a^2+c^2-b^2 '因为我们设AB沿着X轴,所以X只有一个值
把X代入第一个方程 得出 Y=Sqr(c^2 - X^2) ,这里Sqr为平方根
得到的是正值,也就是舍去了低于X轴的那个(程序里下面的Y坐标大)
三个标签 垂直方向对应Text1,Text2,Text3分别存放变长a,b,c
一个按钮 一个Picture
好吧,来看看我们画出了什么球样
想给图形填充吗?嘿嘿,哪还要更复杂的算法呢,加油吧,未来的世界是我们的
- 致新手:用VB6解决一些有趣的问题(五)
- 致新手:用VB6解决一些有趣的问题(一)
- 致新手:用VB6解决一些有趣的问题(二)
- 致新手:用VB6解决一些有趣的问题(三)
- 致新手:用VB6解决一些有趣的问题(四)
- 致新手:用VB6解决一些有趣的问题(六)
- 致新手:用VB6解决一些有趣的问题(七)
- 致新手:用VB6解决一些有趣的问题(八)
- 致新手:用VB6解决一些有趣的问题(九)
- 致新手:用VB6解决一些有趣的问题(十)
- 一些有趣的问题
- 用VB6设计有趣的动画场景
- 终于解决了,vista下用VB6的问题
- 一些有趣的JAVA问题!
- 一些有趣的数学问题
- 用PHP解决一个有趣的字符串问题
- 一些鲜为人知的但却很有趣的Unix/Linux命令(五)
- 一些鲜为人知的但却很有趣的Unix/Linux命令(五)
- How to Plan a project
- 一年有100多天的休息时间,ps 坚决bscsdn微博
- 用Java动态代理实现委托模式
- 边走边爱
- 《BREW进阶与精通——3G移动增值业务的运营、定制与开发》连载之53---BREW SDK 九大功能之电信服务
- 致新手:用VB6解决一些有趣的问题(五)
- membership数据库表结构
- 《BREW进阶与精通——3G移动增值业务的运营、定制与开发》连载之54---BREW SDK 九大功能之其他服务
- Windows平台下编译GO语言
- tcp/ip (六)
- SonyEricsson IOException 80000019
- 2.4 数据操作对象Access
- 图标问题:killall bonobo-activation-server
- 初生“虎犊”不怕“牛”社交网站首度击败搜索引擎