资源预览内容
第1页 / 共5页
第2页 / 共5页
第3页 / 共5页
第4页 / 共5页
第5页 / 共5页
亲,该文档总共5页全部预览完了,如果喜欢就下载吧!
资源描述
为了适应公司新战略的发展,保障停车场安保新项目的正常、顺利开展,特制定安保从业人员的业务技能及个人素质的培训计划vb,图片上机报告VB上机实验报告实验名称:程序设计语言实验日期:指导老师:实验地点:姓名:班级:学号:一、实验名称:实验5顺序结构程序设计二、实验目的:掌握基本的输入输出操作。掌握顺序结构的程序设计方法。三、实验内容:1.课本的、2.用图形、图像框控件实现图片切换和图片放大缩小。3.根据提示,补充下列程序段,并在VB环境下调试:鸡兔同笼问题。计算三角形的面积。四、实验步骤及结果:1、:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerDims1AsString,s2AsStringx=2:y=1s1=x&+&y&=&x+ys2=x&-&y&=&x-yMsgBoxs1&vbCrLf&s2,输出EndSub:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=InputBox(请输入第1个整数,输入,0)y=InputBox(请输入第2个整数,输入,0)Print第1个数为:&xPrint第2个数为:&yPrint和=&x+yPrint差=&x-yEndSub:PrivateSubCommand1_Click()DimrAsSingle,hAsSingleDimareaAsSingle,vAsSingler=InputBox(请输入半径)h=InputBox(请输入高度)area=2*r*r+2*r*hv=*r*r*hPrint圆柱体的半径为:&r;高为:&hPrint表面积为:&areaPrint体积为:&vEndSub:PrivateSubCommand1_Click()DimaAsSingle,bAsSingle,cAsSingleDimsAsSingle,areaAsSinglea=Val(Text1)b=Val(Text2)c=Val(Text3)s=(a+b+c)/2area=Sqr(s*(s-a)*(s-b)*(s-c)Label2=三角形的面积为:&area前天晚上和你通话后,着实让我兴奋了一晚上。我感觉你进步的很快,今天看到你发到我邮箱的VB实习报告中收获,更加得到了证实,继续努力吧。下面是我看了报告以后的一些想法,建议和疑惑,希望得到你的互动。1.刚开始看到题目我不知道你要写的内容,但看到第二页我就猜想可能是关于微机编程的问题。这时我的脑海里马上就想到学编程有什么用,这次编程我最终达到一个什么目的,这次是将哪些学的理论应用到实践中。带着这个想法我继续往下看,到第三页摘要说明时,看到用记事本的形式新建一个文件夹,但为什么必须将自己的分数放在第一行,而且还必须96分以上呢,看到第四页时,有些问题我就得到了答案。第5-6页又用了结构示意图的方法,将这个编程怎么使用又演示了一次2.这个学生信息管理程序的弊病:各班学生的成绩排名没有顺序。我为什么会考虑到这个弊病呢?假如我是从事学生成绩的,将来颁发奖学金都会跟名次挂钩,其他老师向我要数据时,我会很快拿出来排名,免得再统计。第4页的第7点共罗列了个人,其他人省略了,应用VB语言或符号显示一下(语文中是用省略号的形式)。第4页最下面几行有“说明“和“实习报告要求”的文字叙述,是否应调换一下位(转载于:写论文网:vb,图片上机报告)置放在.。3.疑问:人的出生日期应在1-31之间,你报告里设计的幸运数字是0-9,呀,你设计的软件是出生日和幸运日相同的人是否有漏统现象。第三页第三列的幸运数字有什么用呢,可不可以将其删除。4.这个报告设计的思路比较清晰,是老师规定的编程内容吗,其他人编的都是一些什么内容目的-通过该培训员工可对保安行业有初步了解,并感受到安保行业的发展的巨大潜力,可提升其的专业水平,并确保其在这个行业的安全感。
收藏 下载该资源
网站客服QQ:2055934822
金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号