VB课程设计 计算器程序设计.doc

长江学院 课程设计报告 VB课程设计 课程设计题目：计算器程序设计 姓名： 张** 学号： 08***** 专 业 : 电子信息工程 班 级: : 083142 指导教师 : 王敏 叶志翔 摘要 VisualBasic 6.0 是一款可视化的，面向对象和采用事件驱动方式的结构化高级程序设计语言，可用于开发windows 环境下的种类应用程序。它简单易学，效率高，且功能强大，可以与Windows专业开发工具相媲美。在VisualBasic环境下，利用事出有因件驱动的编程机制，新颖易用的可视化工具，使用Windows内部的广泛应用程序接口(API)函数，运用动态链接库（DLL），对象的链接与嵌入（OLE）,开放式数据连接（ODBC）等技术，可以高效，可以快速地开发Windows环境不功能强大，图形界面丰富的程序。 为了适应信息化时代的需求，各高校对大多数专业都开设了一定的计算机语言课程，有的讲授VisualBasic语言。VisualBasic以其语法简单，可视化设计，功能强大，为许多学校计算机语言课程的首选语言。 目前国内各出版了大量的VisualBasic语言教程，它们都具有同样的特点：介绍语言的语法等基本知识，再辅助一些简单的示例。学生通过学习，可能能够考一个不错的成绩，但所掌握的仍然是一些支离破碎的知识，不能将所有的知识融会贯通，遇到具体的程序设计，还是无从下手。 这次我要做的是计算器，通过这样程序设计，我们可以学到好多关于VB语言的使方法，熟悉VisualBasic 6.0的运行环境，快速掌握VB语言！小小的计算器是我们学VB初级语言的最好课程?。  目录 一 功能描述 3 1．功能 3 2. 实验目的 3 二 概要设计 4 1.界面设计 4 2.代码编辑 6 三 详细设计 9 四 心得体会 10 五 参考文献 11 一 功能描述 1．功能 可以简单计算加减乘除四则运算，可以简单计算三角函数运算的简易计算器。 2.实验目的 这次我要做的是计算器，通过这样程序设计，我们可以学到好多关于VB语言的使方法，熟悉VisualBasic 6.0的运行环境，快速掌握VB语言！小小的计算器是我们学VB初级语言的最好课程?。 二 概要设计 1.界面设计 添加8个控制按扭，Command1~ Command8 图1 接着设计好按扭的位置，有功能键如下： 图2 修改键后，各功能键如图3 图3 2.代码编辑 Dim chr As String 定义函数变量等 Dim Dianal As Boolean Dim Fuhao As Boolean Dim FuhaoZhuangtai As String Dim dian As Boolean Dim F As Double Dim FirstNumber, NumbumBuf As Double Private Sub Command1_Click(Index As Integer) dian = False TEXT1显示的是 chr chr = Val(Index) If Text1.Text = 0 Then Text1.Text = chr Else Text1.Text = Text1.Text + chr End If NumbumBuf = Val(Text1.Text) End Sub Private Sub Command2_Click(Index As Integer) Select Case Index Case 0 平方运算 Text1.Text = Val(Text1.Text) * Val(Text1.Text) Case 1 开平方运算 If Text1.Text 0 Then Text1.Text = Sqr(Val(Text1.Text)) Else MsgBox 开平方数不能为负数,你小学白上了啊?, , 64 + vbOK End If Case 2 倒数运算 If Text1.Text 0 Then Text1.Text = 1 / Val(Text1.Text) Exit Sub Case 3 阶乘 If Text1.Text 0 Then Call fact(Text1.Text, F) Text1.Text = F Else Exit Sub End If Case 4 Inx 运算 Text1.Text = E