简易计算器VB课程设计报告-.pdf
《简易计算器VB课程设计报告-.pdf》由会员分享,可在线阅读,更多相关《简易计算器VB课程设计报告-.pdf(9页珍藏版)》请在得力文库 - 分享文档赚钱的网站上搜索。
1、简易计算器要求:用 VB 做类似于 windows 自带的计算器程序绪论:Visual Basic(VB)是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。从任何标准来说,VB都是世界上使用人数最多的语言不仅是盛赞VB的开发者还是抱怨VB的开发者的数量。它源自于BASIC编程语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。1.界面设计:根据 WINDOWS 计算器界面模型,修改后制作简易计算器界面。新建一个窗体,添加一个文本框用
2、于显示运算数字和结果,添加若干按钮包括(数字09,+,-,*,/,=,x,1/x,清屏,退出)。当单击数字按钮时输入运算数时,单击运算符按钮,再单击“=”按钮,则再文本框中显示计算结果。具体如下图计算器界面设计示意图流程图如下:简易计算器计算器管理界面计算界面退出程序2.程序代码:Dim A,B As Single Dim Op As String Private Sub Command1_Click()Text1.Text=Text1.Text+Command1.Caption End Sub Private Sub Command14_Click()定义减法If A=0 Then A=Te
3、xt1.Text Else B=Text1.Text End If Text1.Text=Op=-End Sub Private Sub Command2_Click()Text1.Text=Text1.Text+Command2.Caption End Sub Private Sub Command20_Click()定义平方A=Text1.Text B=A 2 Text1.Text=B End Sub Private Sub Command3_Click()Text1.Text=Text1.Text+Command3.Caption End Sub Private Sub Command4
4、_Click()Text1.Text=Text1.Text+Command4.Caption End Sub Private Sub Command13_Click()定义加法If A=0 Then A=Text1.Text Else B=Text1.Text End If Text1.Text=Op=+End Sub Private Sub Command5_Click()Text1.Text=Text1.Text+Command5.Caption End Sub Private Sub Command6_Click()Text1.Text=Text1.Text+Command6.Capti
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 简易 计算器 VB 课程设计 报告
限制150内