回转体体积计算课程设计报告

《回转体体积计算课程设计报告》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、VisualBasic课程设计报告所属课程名称：VisualBasic程序设计课程设计题号：42课程设计题目：回转体体积计算课程设计难度：3星课程设计时间：2013.3.1~3.29学号：6姓名：王思珩自评成绩：900南京理工大学机械工程学院二〇一三年三月一、程序功能简叙题目的功能要求，涉及的知识点等。本程序使用来计算复杂回转体的体积的。回转体指是由折线（包括多段直线和圆弧段）为母线绕一轴线旋转360º之后生成的旋成体。简单的回转体可以认为是由多个回转体体素构成的组合体。回转体体素包括圆柱体、圆台（既截锥体）、圆锥体、球冠（既局部球体）和母线为圆弧的球台这五种情况。二、课程

2、设计的详细设计1、总体设计思路输入数据，声称段数，分别输入数据并计算，输出结果2、界面设计界面构成及实现方法。本程序是由两个窗口组成，结构比较简单。设计的第一点是它的布局，鉴于课程设计已经给出很合理的结构布局，因此没有进行更改。程序第一个主窗口是由列表框，文本框，单选框，标签和命令按钮等组成。输入数据全部在第一个窗体内操作，可以进行重置，清空已输入的数据，从而进行重新输入。第二个窗体主要是显示计算结果，只有一个列表框和一个命令按钮构成，相对简单，单击按钮可以返回第一个窗体，进行重新操作，人性化。为方便设计，将“确定”按键做为计算的作用，而“计算”按键仅仅作为呼出显示结果的列

3、表框的作用。3、功能模块设计9先是由第一个文本框输入特征段数，单击生成列表框中就有相应的特征段数。指定一个段号，就可以进行体素选择，与此同时调用picture过程，根据所选的不同体素，显示出不同的标签内容和文本框个数。指定尺寸后单击确定表示该段尺寸指定完毕。使用相同的方法在段号中选择其他的特征段，为其指定类型和尺寸。回转体所有的特征段均定义完毕之后，单击计算按钮，程序计算每个特征段的体积和总体积并显示计算结果。如果没有完全指定特征段类型或尺寸，在单击计算是会提示错误信息。一、设计中遇到的问题与解决办法【问题1】：数组jieguo()无法保存数据【解决办法】：重定义时加入Pr

4、eserve语句二、更上一层楼1使用了局部变量接收数据，简化了程序。2加入List1.ListIndex=0以及IfList1.ListIndex

5、寒假没碰VB的缘故，记忆出现一些偏差，时不时在编程中出现一些小问题，比如未定义函数，溢出等小失误难免出现，但是好在通过回归课本，细细地翻了一遍，克服了困难9一、源程序代码OptionExplicit'强制声明PrivateConstPiAsSingle=3.Dimjieguo()AsSingleDimn,iAsIntegerPrivateSubCommand1_Click()n=Val(Text1.Text)List1.ClearIfText1.Text=""ThenMsgBox"请输入特征段数",32,"注意"ExitSubElseIfText1.Text=0ThenMs

6、gBox"请输入大于零的自然数",32,"注意"Text1.Text=""ElseFori=1TonList1.AddItemiNextFrame1.Enabled=TrueList1.ListIndex=0EndIf9EndSubPrivateSubCommand3_Click()‘单击重置事件List1.Clear‘列表框清空Text1.Text=""‘文本框内容清空EndSubPrivateSubCommand4_Click()‘单击退出事件EndEndSubPrivateSuboption1_Click(indexAsInteger)‘显示不同的图片框，用于输入不同

7、的体素的尺寸IfOption1(1)Then‘圆柱体的尺寸Label3.Caption="底面直径"Label4.Caption="圆柱高度"Label5.Visible=FalseText5.Visible=FalseElseIfOption1(2)Then‘圆台的尺寸Label3.Caption="下底直径"Label4.Caption="圆台高度"Label5.Caption="上底直径"Label5.Enabled=TrueLabel5.Visible=TrueText5.Visible=TrueElseI