9121001500310回转体体积计算课程设计报告.docVIP

9121001500310回转体体积计算课程设计报告.doc

  1. 1、本文档共19页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
Visual Basic 课 程 设 计 报 告 所属课程名称:Visual Basic程序设计 课程设计题号:42 课程设计题目:回转体体积计算 课程设计难度:3星 课程设计时间:2013.3.1 ~ 4.17 学 号:912101500310 姓 名: 石博博 自评成绩:90分 南京理工大学机械工程学院 二〇一三年三月 程序功能 回转体的体积计算是数学和力学经常用到的内容,该程序是可以生成回转体并计算其体积的应用程序。 涉及的知识点有:(1)多模块程序设计(2)动态数组(3)定义数组类型。 课程设计的详细设计 1、总体设计思路 设计思路:简单的回转体可以看成是由多个回转体体素构成的组合体。回转体体素包括:圆柱体、圆台、圆锥体、球冠和母线为圆弧的球台这五种情况。通过对每一段的名称、体素、参数设置来进行计算并保存结果,最后将所有结果相加即可得到回转体体积。 结构框图: 2、界面设计 窗体界面截图: Frmzjm:包含的控件有:按钮,文本框,标签,框架,列表框。外观通过设置各个控件的相关属性得到。 Frmwork: 包含的控件有:按钮,标签,列表框。外观通过设置各个控件的相关属性得到。 3、功能模块设计 主要功能及实现算法: 1.输入段数,单击生成按钮,列表框自动生成相应的条目,如果不输入段数就单击生成按钮或者是计算按钮则会有错误提示。此功能通过Cmdgenerate(生成按钮)的click事件、list1(段号列表框)的additem方法以及msgbox实现 2.选定某一段号,单击“体素元素“栏的其中一个单选按钮,Frame3中自动出现参数设置框,输入正确的数据单击确定按钮即可计算,通过单击计算按钮即可调出Frmwork并查看计算结果,过程中也会有相应的错误提示。此功能通过cmdok和cmdwork的单击事件实现,其中五个单选按钮为一组控件数组,名称为option1(),index属性从1到10。 3.重置按钮和退出按钮的事件过程:重置按钮主要是清空列表框和文本框的数据,便于重新输入数据。 设计中遇到的问题与解决办法 【问题1】:当文本框中输入负数或0,或者是字母,汉字时的错误提示,以及相应的部分操作。 【解决办法】:通过代码实现: Private Sub Cmdgenerate_Click() Dim s As Integer, n As Integer s = Val(Text1.Text) List1.Clear If s = 0 Then MsgBox 请先输入正确的回转体的特征段数。, 48, vol Text1.Text = Else Frame.Enabled = True End If For n = 1 To s List1.AddItem n List1.ListIndex = 0 Option1(1).Value = True Next End Sub 【问题2】:单击不同的单选按钮时,出现与之对应的参数设置框。 【解决办法】:预先安排chicuntxt1、chicuntxt2、chicuntxt3(输入参数的文本框)和chicun1、chicun2、chicun3(标签),当需要时把第三个的visible、enabled属性设为true,不需要时设为false,并改变其caption属性,这样就会有相应的效果了。 【问题3】:对chicuntxt中输入的数据的判断及错误提示 【解决办法】:类似于list1的处理,对数据进行简单的判断,例如: If Val(chicuntxt1.Text) = 0 Or Val(chicuntxt2.Text) = 0 Then MsgBox 请输入正确的尺寸数据 , 32, Tips Exit Sub End If 【问题4】:定义自定义数组类型 【解决办法】: 由于之前没有接触过,所以花了很多时间去搞懂它,最后处理好了。 Private Type huizhuanti 自定义数据类型(下面代表的是huizhuanti的各个属性及其数据类型) d1 As Single 上底 H As Single 高 d2 As Single 下底 name As String

文档评论(0)

185****7617 + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档