vb实验三选择结构程序设计(伟奇)new

《vb实验三选择结构程序设计(伟奇)new》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、实验报告学院：专业：年级：姓名：学号：实验室号：_______计算机号：实验日期：年月日指导教师签字：成绩：报告退发(订正、重做)实验三、选择结构程序设计一、实验目的1、掌握If语句的使用。2、掌握SelectCase语句的使用及其与If语句的区别。二、实验内容1、请编一程序（程序界面如图3-1），用于根据输入的学生成绩查询对应的奖励情况，条件如下：三门总分不低于270分（含270），特等奖；三门总分240分（含240分）~270分（不含270分），优秀奖；总分低于240分，但某一单科成绩不低于95分，特别奖。（a）（b）图3-12、对任意输入的三个数按从小到大的顺序显示出来，运行结果参考

2、图3-2。要求：程序中不得使用循环结构和转向语句；掌握两个数交换的方法。图3-23、简单计算器的实现（界面参考图3-3a）。要求：使用SelectCase语句和If语句；能进行+、-、*、/、和Mod六种运算；有基本的数据合法性和运算符合法性检验报错能力（如图3-3b和图3-3c）。(a)(b)(c)图3-3三、实验环境硬件：PC机软件：Windows操作系统；VisualBasic6.0四、实验步骤1、（题目要求见内容部分，略）A、界面设计：1)布局设计：按下图布局在主窗体Form1上放置三个标签（Label1、Label2和Label3），四个文本框（Text1、Text2和Text

3、3）和一个命令按钮（Command1）前几次可具体描述过程，甚至具体操作动作，熟练以后建议不用这么罗嗦，直接在布局图上体现。。Label1Command1Label3Text3Text2Text1Label2Form12)按下表设置各对象属性。对象属性值Form1Caption"成绩查询"Label1Caption"请输入您的成绩"Label2Caption"总分"Command1Caption"查询"3)双击Command1Name属性值是唯一可以标识一个对象的字符串，所以建议在任何引用对象的地方，标明对象名称，而不是表观类属性取值。，打开代码窗口编写代码。B、代码设计：PrivateS

4、ubCommand1_Click()'变量声明：四个整型变量，分别存放三科成绩和总成绩。学生刚开始写代码，可以注释形式提示算法过程。完成题目后再引导思考其它算法或写些用于完善的代码。DimintScore1AsInteger,intScore2AsInteger,intScore3AsIntegerDimintSumAsInteger'接受输入，将三个文本框中的成绩分别转换成数值型数据，存入对应的变量中。“数据输入à核心处理à数据输出”模块化思想，但本例代码中未完全体现，可留给学生完善和改进。intScore1=CInt(Text1.Text)intScore2=CInt(Text2.Te

5、xt)intScore3=CInt(Text3.Text)intSum=intScore1+intScore2+intScore3'输出总分Label3不好的对象命名，对代码中将引用到的对象，最好取个“观其名，知其用”的名字。.Caption=intSum'开始判断：总分>=270吗？是，则用MsgBox弹出“获得特等奖”的通知。IfintSum>=270ThenMsgBox"您获得了特等奖！",,"获奖通知"'否则，继续判断：总分>=240吗？是，则通知“获得优秀奖”。ElseIfintSum>=240ThenMsgBox"您获得了优秀奖。",,"获奖通知"'不是，继续判断：存在任意单科

6、成绩>=95吗？是，则通知“获得特别奖”。ElseIf(intScore1>=95)Or(intScore2>=95)Or(intScore3>=95)ThenMsgBox"您获得了特别奖。",,"获奖通知"ElseMsgBox"您未获奖。",,"获奖通知"Endif'鼓励归并的获奖通知输出*。EndSub2、（题略）实验报告中省略不必要的重复和纸张浪费。A、界面设计：Label2txtYtxtMidLabel3txtMaxtxtZtxtXtxtMinLabel5Label4cmdSortLabel11)按下图布局在主窗体frmSort上画出各所需控件。frmSort2)属性设置（列表）：

7、对象属性值frmSortCaption"排序"cmdSortCaption"排序"Label1Caption"X"Label2Caption"Y"Label3Caption"Z"Label4Caption"排序前"Label5Caption"排序后"B、代码设计：PrivateSubcmdSort_Click()'声明3个整型变量，分别存放最小值、中间值和最大值。DimintMin%,intMid%,intMax'声明1