vb函数曲线动态绘制实验报告.docVIP

  1. 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
vb函数曲线动态绘制实验报告

计算机实习二 需求分析 : 函数曲线动态绘制 使用面向对象设计环境,编程实现函数曲线的自动绘制。 程序功能是: 根据选择的演示函数,允许用户输入参数,然后动态用不同颜色绘制出相应函数曲线。在用户没有做出其他选择之前,一直重复动态演示曲线绘制过程。 要 求 函 数 名 函 数 式 需要输入的参数 及格要求 一次函数 Y=A x + B A, B 及格要求 二次函数 Y=A x2 + B x + C A, B, C 中等要求 正弦函数 Y=A sin (B x + C) + D A, B, C, D 中等要求 余弦函数 Y=A cos (B x + C) + D A, B, C, D 良好要求 幂函数 Y=x a A 良好要求 指数函数 Y=a x A 良好要求 对数函数 Y=log a x A 优秀要求 正切函数 Y=tan (A x + B) A, B 优秀要求 余切函数 Y=cot (A x + B) A, B 程序设计: 对面向对象设计环境的认识: 第一次接触面向对象设计环境,觉得和C语言和汇编语言有很大差别,不是给你一个界面一条条代码往下写,而是给出很多的控件备选,在这些控件的代码添写处写该孔件所要执行的功能,很多控件是相互联系的,一个控件会启用其他一个或几个控件的功能。还要设计一个合理的外观,通过设置相应的属性选项设计界面。但是编程的思想和以前学习的语言是完全一样的,数据类型,定义,顺序,循环,选择结构的设计都和其他语言没太大分别,所以学习起来并不困难。 2,程序构思; 把要绘制的函数放在一个列表框中,用时钟的启用和停止控制图像的都态绘制。选择列表框中的一个函数,对应的一个时钟启用,其他的时钟禁用,在时钟控件的代码填写处写图像绘制的代码,用RGB函数产生随机颜色。直线用两点法绘图,其他的用描点法绘图,用FOR循环产生X值,再根据函数公式计算出Y值。使用全局变量,因为每次只绘一个函数的图,所以全部函数可以用同样的变量,每次绘图给变量付值即可。 程序流程图: 程序各项属性的设置: Begin VB.Form Form1 BackColor = H00FFFFC0 Caption = 函数图象动态绘制 ClientHeight = 4905 ClientLeft = 60 ClientTop = 345 ClientWidth = 6690 LinkTopic = Form1 ScaleHeight = 4905 ScaleWidth = 6690 StartUpPosition = 2 屏幕中心 Begin VB.CommandButton cancel Caption = 退出程序 Height = 375 Left = 1200 TabIndex = 5 Top = 4080 Width = 975 End Begin VB.CommandButton lt3 Caption = 清 屏 Height = 375 Left = 120 TabIndex = 4 Top = 4080 Width = 975 End Begin VB.Timer Timer9 Left = 1560 Top = 2760 End Begin VB.Timer Timer8 Left = 960 Top = 2760 End Begin VB.Timer Timer7 Left = 480 Top = 2760 End Begin VB.Timer Timer6 Left = 0 Top =

文档评论(0)

almm118 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档