下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、综合性实验实验名称:用vb编写简单计算器专业班级:土木工程0901班学生姓名:*学号:*指导教师:*1需求分析该计算器程序是在VisualBasic6.0环境下编写,编写完成后在WindowsxpT运行,通过初步测试,发现该计算程序能完成整数的加,减,乘,除四种运算。通过在虚拟键盘上用鼠标点击输入第一个数,然后点击运算符,再输入第二个数,最后点击“=”就会在计算器上方的文本框中输出结果,活空文本框进行下次运算。经过仔细测试发现,该计算器最高支持五位整数的运算,在除法运算中能精确到小数点后14位。2运行环境WINDOWS探统;VB6.0;3开发工具和编程语言开发工具:VisualBasic6.0
2、“微型整值计算器”程序编写代码:Dimop1AsIntegerDimop2AsIntegerDimoperatorAsStringPrivateSubCommand1_Click()Text1.Text=Text1.Text&1EndSubPrivateSubCommand2_Click()Text1.Text=Text1.Text&2EndSubPrivateSubCommand3_Click()Text1.Text=Text1.Text&3EndSubPrivateSubCommand4_Click()Text1.Text=Text1.Text&4EndSubPrivateSubComma
3、nd5_Click()Text1.Text=Text1.Text&5EndSubPrivateSubCommand6_Click()Text1.Text=Text1.Text&6EndSubPrivateSubCommand7_Click()Text1.Text=Text1.Text&7EndSubPrivateSubCommand8_Click()Textl.Text=Textl.Text&8EndSubPrivateSubCommand9_Click()Textl.Text=Text1.Text&9EndSubPrivateSubCommand11_Click()Text1.Text=Te
4、xt1.Text&0”EndSubPrivateSubCommand10_Click()op1=Val(Textl.Text)operator=+Text1.Text=EndSubPrivateSubCommand12_Click()op1=Val(Text1.Text)operator=-Text1.Text=EndSubPrivateSubCommand13_Click()op1=Val(Text1.Text)operator=*”Text1.Text=EndSubPrivateSubCommand14_Click()op1=Val(Text1.Text)operator=/Text1.T
5、ext=EndSubPrivateSubCommand15_Click()op2=Val(Text1.Text)Ifoperator=+ThenText1.Text=op1+op2Elselfoperator=-ThenText1.Text=op1-op2Elselfoperator=*ThenText1.Text=op1*op2Elselfoperator=/ThenText1.Text=op1/op2EndIfEndSub4系统设计(1)程序的组织结构(包括窗体、模块及其功能)。窗体模块:用来包含sub与事件过程窗口:用来承载控件,包括按钮控件、文本框控件、标签控件。控件:按钮控件用来输入
6、数据与运算符号,文本框控件用来显示输入的数值以及最后的运算结果,标签控件显示标签既该程序的自定义名称。Sub过程:通过代码的编写使窗口上的控件能在程序运行时有特殊的作用,使命令按钮能产生相应的数值,运算按钮产生相应的运算过程,及文本框中显示相应结果。(2)每个窗体(模块)详细描述设计思路。I. 首先打开新建工程,创建一个forml窗口,并在窗口中放入控件。分别放入一个标签控件,一个文本框控件和15个按钮控件,调整各控件的大小和位置,使其布局如下图示。II. 调整各控件的届性值。单击标签控件,将其caption届性设置为“微型整值计算器”并将fount届性设置为粗体,小四。将文本框活空,然后依次
7、设置command1commandl5勺caption届性分别为数字“110”和运算符“+”“-,“*,”以及“=”。III. 编写控件触发事件过程代码。先声明三个变量:两个整值和一个字符申。然后编写command1command10勺click事件使用赋值语句,在文本框中显示相应数值。再编写command11command1的click事件,使用赋值语句赋予相应运算符,并将文本框中字符申转换为数值型赋值给第一个变量,活空文本框。编写command15的click事件代码,将第二次输入的字符申转换为数值型赋给第二个变量,并用块结构条件语句分别编写四种运算过程。IV. 完成后进行调试,修改,运行
8、,测试。5系统运行及测试(1)几组测试数据以及相应的测试结果:a0QO以里坦伯十甘柔1S34516T940*L-t1=11运算10/3的结果运算10/3的结果运算10/3的结果运算14*3的结果运算78+20的结果(2)运行界面:6参考文献1 郭晓启、谢日行,visualbasic程序设计教程,黄河水利出版社2 龚沛曾、杨志强、陆慰民,visualbasic程序设计实验指导与测试,高等教育出版社7心得体会在这次实验中,在vb环境下制作了一个标准exe工程,虽然结果比较令人满意,但是在制作过程中遇到了不少困难。在其中深深体会到了了解和掌握一门计算机语言并不容易,要真正学好它必须要付出足够的努力。我在这次实验中就查阅了相关资料,并通过与他人的相互交流学习,这样既有利丁相互的学习与
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2024年度稻米采购合同:供应商资质审核及质量标准
- 2024年度电子商务平台技术研发合同2篇
- 《营销赢思维》课件
- 2024年度股权转让合同标的详细描述及服务内容扩展
- 2024年度区块链技术的连锁便利店加盟协议
- 2024年度出版发行分包合同2篇
- 2024年度城市轨道交通建设劳务分包合同
- 2024年度城市基础设施建设融资合同
- 基本课件教学课件
- 北师大版六年级数学下册全册教案
- 领款单模板【A4纸】
- 精彩两分钟-鸡犬升天
- 学校实验室和危化品管理风险管控清单
- 初中数学人教七年级上册 一元一次方程实际问题与一元一次方程-销售盈亏问题
- 企业年金受托管理机构选择评分标准
- 西方经济学导论全套课件
- 公路桥梁隧道施工安全事故案例汇编
- 树立正确的人生观
- 二年级下册音乐课件 (简谱) 欣赏 调皮的小闹钟(3) 人教版 15张
- 中学生安全教育优质实用课件(共54张PPT)
- 第10课《我是汽车设计师》教学设计(新人教版小学美术四年级上册)
评论
0/150
提交评论