欢迎来到天天文库
浏览记录
ID:59130587
大小:2.80 MB
页数:18页
时间:2020-09-12
《课程设计报告书高分子14107蔡铃.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、广东石油化工学院程序设计基础课程设计报告书题目:肥胖程度的判定院级:化学工程学院专业:高分子材料与工程班级:高分子14-1学号:姓名:蔡铃指导老师:李金瑞完成时间:2015年06月02日至2015年06月20日一、设计目的专业知识有机地结合起来,锻炼学生分析问题,解决问题的能力,实现学以致用的教学目标。二、实验设备计算机三.实验内容综合运用课程所学的知识,编程解决一个与专业相关的问题。四、实验要求所解决的问题必须与专业知识结合;分组合作或自行设计,严禁抄袭。五、题目描述根据输入的身高体重数据进行程序运算得到人体指标,根据指标分析,判断人体肥胖程度并提出
2、合理建议。六、问题分析利用二个不同的计算公式对输入的数据进行处理,结果会得到人体健康指标,这个指标在不同的范围内时代表着人体不同的健康水平。Cases+0.3*sTos+0.5*sLabel6.Caption="评价为:中度肥胖&体质指数为:"&bCases+0.2*sTos+0.3*sLabel6.Caption="评价为:轻度肥胖&体质指数为:"&bCases+0.1*sTos+0.2*sLabel6.Caption="评价为:超重&体质指数为:"&bCases-0.1*sTos+0.1*sLabel6.Caption="评价为:正常&体质指数为:
3、"&bCases-0.2*sTos-0.1*sLabel6.Caption="评价为:轻度营养不良&体质指数为:"&bCases-0.3*sTos-0.2*sLabel6.Caption="评价为:中度营养不良&体质指数为:"&bCaseIs4、aticn%Dimxm$,mm$xm=Combo1.Textmm=Text1n=n+1Ifxm="蔡铃"Andmm="123"Orxm="李四"Andmm="456"Orxm="王五"Andmm="789"Theny=MsgBox("密码正确,身份验证通过!")Form2.ShowUnloadMeElseIfn>=3ThenMsgBoxStr(n)+"次密码错误,谢谢呵!":Endy=MsgBox("密码错误,再来一次")Combo1.Text=""Text1=""EndIfEndSubPrivateSubForm_Load()Combo1.AddIt5、em"蔡铃"Combo1.AddItem"李四"Combo1.AddItem"王五"Text1.PasswordChar="*"Text1=""EndSubPrivateSubImage1_Click()EndSubPrivateSubCommand1_Click()Val(t1.Text)Val(t2.Text)Dims#,b#IfIsNumeric(t1.Text)=TrueAndIsNumeric(t2.Text)=TrueThenIfOp1.Value=TrueThens=t1.Text-1.05b=t2.Text/(t1.Text*t1.Te6、xt)ElseIfOp2.Value=TrueThens=(t1.Text-1)*0.9b=t2.Text/(t1.Text*t1.Text)ElseIftemp=MsgBox("请选择体重算法",vbOKOnly,"警告")ThenEndIfElsetemp=MsgBox("请输入正确的身高和体重",vbOKOnly,"警告")EndIfSelectCasesCaseIs>s+0.5*sLabel6.Caption="评价为:重度肥胖&体质指数为:"&bCases+0.3*sTos+0.5*sLabel6.Caption="评价为:中度肥胖&体质指数7、为:"&bCases+0.2*sTos+0.3*sLabel6.Caption="评价为:轻度肥胖&体质指数为:"&bCases+0.1*sTos+0.2*sLabel6.Caption="评价为:超重&体质指数为:"&bCases-0.1*sTos+0.1*sLabel6.Caption="评价为:正常&体质指数为:"&bCases-0.2*sTos-0.1*sLabel6.Caption="评价为:轻度营养不良&体质指数为:"&bCases-0.3*sTos-0.2*sLabel6.Caption="评价为:中度营养不良&体质指数为:"&bCase8、Is
4、aticn%Dimxm$,mm$xm=Combo1.Textmm=Text1n=n+1Ifxm="蔡铃"Andmm="123"Orxm="李四"Andmm="456"Orxm="王五"Andmm="789"Theny=MsgBox("密码正确,身份验证通过!")Form2.ShowUnloadMeElseIfn>=3ThenMsgBoxStr(n)+"次密码错误,谢谢呵!":Endy=MsgBox("密码错误,再来一次")Combo1.Text=""Text1=""EndIfEndSubPrivateSubForm_Load()Combo1.AddIt
5、em"蔡铃"Combo1.AddItem"李四"Combo1.AddItem"王五"Text1.PasswordChar="*"Text1=""EndSubPrivateSubImage1_Click()EndSubPrivateSubCommand1_Click()Val(t1.Text)Val(t2.Text)Dims#,b#IfIsNumeric(t1.Text)=TrueAndIsNumeric(t2.Text)=TrueThenIfOp1.Value=TrueThens=t1.Text-1.05b=t2.Text/(t1.Text*t1.Te
6、xt)ElseIfOp2.Value=TrueThens=(t1.Text-1)*0.9b=t2.Text/(t1.Text*t1.Text)ElseIftemp=MsgBox("请选择体重算法",vbOKOnly,"警告")ThenEndIfElsetemp=MsgBox("请输入正确的身高和体重",vbOKOnly,"警告")EndIfSelectCasesCaseIs>s+0.5*sLabel6.Caption="评价为:重度肥胖&体质指数为:"&bCases+0.3*sTos+0.5*sLabel6.Caption="评价为:中度肥胖&体质指数
7、为:"&bCases+0.2*sTos+0.3*sLabel6.Caption="评价为:轻度肥胖&体质指数为:"&bCases+0.1*sTos+0.2*sLabel6.Caption="评价为:超重&体质指数为:"&bCases-0.1*sTos+0.1*sLabel6.Caption="评价为:正常&体质指数为:"&bCases-0.2*sTos-0.1*sLabel6.Caption="评价为:轻度营养不良&体质指数为:"&bCases-0.3*sTos-0.2*sLabel6.Caption="评价为:中度营养不良&体质指数为:"&bCase
8、Is
此文档下载收益归作者所有