使用VB 设计一个简易计算器.docx
实验一设计一个简易的计算器-、实验目的(1) 熟悉VB集成开发环境(2) 设计一个简易的计算器,熟悉使用VB开发应用程序的全过程二、实验内容【题目】:创建一个VB工程,实现简易计算器的功能,效果图如图1-1所示。图1-1【编程要求】:运行程序时,首先,在Text1中输入操作数一,在Text2中输入操作数二;然 后单击“+”按钮,可实现两个数的加法运算并显示其结果;单击'-”按钮,可实现两个数 的减法运算;单击“* ”按钮,可实现两个数的乘法运算;单击“/”按钮,可实现两个数的 除法运算;单击“清空”按钮,可清空操作数和结果;单击“退出”按钮退出程序运行。 三、实验步骤(1) 启动 Microsoft Visual Basic 6.0,新建一个工程。(2) 创建用户界面。参照图1-2所示添加控件并进行布置。在窗体Forml适当位置上添加框架控件Framel和Frame2,添加标签Labell、Label2、 Label3、Label4,添加文本框(TextBox) Textl 和 Text2,添加命令按钮(CommandButton) Commandl、Command2、Command3、Command4、Command5、Command6。(3)设置界面上各个对象的属性。如表1-1所设置。效果如图1-3所示。表1-1对象属性名称属性值对象属性名称属性值FormlCaption简易计算器Text2Text(空)FramelCaption输入数据CommandlCaption+Frame2Caption选择计算Command2Caption-LabellCaption操作数一:Command3Caption*Label2Caption操作数一:Command4Caption/Label3Caption结果:Command5Caption清空Label4Caption(空)Command6Caption退出TextlText(空)图1-3(4)编写对象相应事件的程序代码要实现题目要求的功能,需要在代码编辑器中编写6个命令按钮的单击事件过程。代码 如图1-4或图1-5所示。(5)保存工程。输入代码完成后,应该先保存工程,再运行程序,以避免因死机等意外发生而造成损失。 一个工程由若干文件组成,保存文件的顺序应该是先保存窗体文件(F1.frm),再保存文件 工程文件(Pl.vbp),而保存地点则可自由安排。(6)测试和调试应用程序。(7)生成可执行程序。执行“文件”一“生成P1.exe”菜单命令,根据提示进行操作即可将本工程编译成能 脱离VB环境而独立运行的可执行程序P1.exe。Privat.e Sub Command 1_C1 ick (.)Labe 14. Caption 二 Vai (Text 1. Text) + Vai (Text2. Text.) E;nd SubPrivat. e Sub Commancl2_Cl ick 0Labe 14. Caption 二 Vai (Text 1. Text) - Vai (Text2. Text.)End SubPrivat. e Sub Commancl3_Cl ick 0Labe 14. Caption 二 Vai (Text 1. Text) * Vai (Text2. Text.)End SubPrivat. e Sub Commancl4_Cl ick 0Dim f As Single '甬single作为数据类型进行声明Dim用在局部变量或模块级变量的声明中 f = Vai (Text 1. Text) / Vai(Text2. Text)Labe14. Caption = fRem Labe 14. Caption = Vai(Text 1) / Vai(Text2)End SubPrivat. e Sub Commancl5_Cl ick (.)Labe14. CaptionText 1. Text 二"Text 2. Text = * End SubPrivat e Sub Command6_Cl i ck (.)EndEnd Sub l-l IICobband2图1-4 | |Cli ckPrivat.e Sub Command 1 _C 1 ic-k (.)Labe 14. Caption = Vai (Text 1) + Vai (Text2)End SubPri vat.e Sub Command2_Cl ic-k (.)Labe 14. Caption 二 Text 1. Text - Text2. TextEnd SubPrivate Sub Commands_C 1 ick (.)Labe 14. Caption 二 Vai (Text. 1. Text) * Vai (Text2. Text.) End SuhPrivate Sub Command4_C 1 ick (.)Dim f As Single '用single作为数据类型进行声明Dim用在局部变量或模块级变量的声明中 f = Vai (Text 1. Text) / Vai(Text2. Text) Labe 14. Caption = fRem Labe 14. Caption = Vai(Text 1) / Vai(Text2)End SubPri vat.e Sub Command5_Cl ic-k (.)Labe 14. CaptionText 1. Text 二”Text.2. Text.二End SubP r i v at. e Su b Comm an d 6_G 1 i c- k t,)EndEnd Sub【补充知识点】类定义了对象的属性、方法和事件。在VB系统中,已经设计好了大量的类,如窗体、菜单以及工具箱中的各个控件等。类是创建对象实例的模板对象是类的实例。控件类的实例化,可以得到真正的控件对象。实例化过程就是在工具 箱选中某一控件类按钮,然后在窗体上拖动鼠标绘制一个控件的过程。绘制的控件就是对象。对象是具有某些特征和行为的实体。某些特征指的是对象的一组属性的取值,某些行为 指的是对象的方法。同类对象具有一组相同的属性,但不会有完全相同的属性值,即特征各 异。/对象的命名:按VB约定,名称必须是以字母或汉字开头的由字母、汉字、数字、下 划线组成的串,其长度127个字符。/创建对象后可以进一步设置和修改对象的属性,有以下两种方法:(1) 在设计阶段利用属性窗口设置和修改属性值。(2) 在程序中用赋值语句给属性赋值,其格式为:对象名属性=属性值如在Commandl的单击事件过程中,给Label4的Caption属性赋值,代码如下:Private Sub Command1_Click()Label4.Caption = Val(Textl) + Val(Text2)End Sub大部分属性既可以在属性窗口中设置,也可以在程序中设置,如Label4.Captio属性。 也有一些只能在属性窗口中设置,不能在程序中设置,如对象的Name属性。还有一些只能 在程序中设置,不能在属性窗口中设置,如ListBox的Listindex/基本数据类型(PPT第13页)数据类型类型名称类型符号存储空间范围精度数 值 型整数字节型Byte1B 0 28-1整型Integer%2B-215215-1长整型Long&4B-231231-1实数单精度型Single!4B略7位有效数字双精度型Double#8B略15位有效数字货币型Currency8B略字符型String$=中1/产与串长度 有关逻辑型Boolean2BTrue或 False日期型Date8B100年1月1日9999年12月31日对象型Object4B任何对象引用变体型VariantW16B数值型可达Double型的范围,变体 型是VB数据的缺省数据类型,它 可以存储各种类型的数据。/Dim f As Single用singl作为数据类型(字符串变量)进行声明 如 5/3=1.666667Dim用在局部变量或模块级变量的声明中/ Label4.Caption = Val(Textl.Text) / Val(Text2.Text)此处用隐式声明变量,在VB中,允许不显示声明而直接使用变量,此时VB会把该变量指定为变体(Variant)数据类型,并默认为局部变量。如 5/3=1.66666666666667/Val()函数格式:Val(c)功能:将数据字符串转换成数值说明:C为字符串类型的参数,函数返回值为数值型数据。函数类型:Double型Val()函数将数字字符串转换为数值型数据,是从第一个字符开始截取,遇到非数值字符(第 一个表示指数的E、e、D、d除外)时停止,返回已截取的数值作为其值。例如:Val(”a45”)的值为 0Val(”45a12”)的值为 45Val(”3e2”)的值为 3003*102Val(”3ee2”)的值为 3/使用TextBox输入数据程序运行时在应用程序界面上,使用文本框(TextBox)接收用户从键盘上输入的数据,文 本框的Text属性(字符类型)为输入的内容,供程序进行处理。例如:Dim Sname As String, age As IntegerSname=Text1.TextText1.Text中存有用户输入的数据age=Val(Text2.Text)用Val()函数将Text2中字符串转换成数值