admin 管理员组文章数量: 1086019
2024年3月27日发(作者：跷二郎腿是不是不礼貌)
实验一 设计一个简易的计算器
一、实验目的
（1）熟悉VB集成开发环境
（2）设计一个简易的计算器，熟悉使用VB开发应用程序的全过程
二、实验内容
【题目】：创建一个VB工程，实现简易计算器的功能，效果图如图1-1所示。
图1-1
【编程要求】：运行程序时，首先，在Text1中输入操作数一，在Text2中输入操作数二；然
后单击“+”按钮，可实现两个数的加法运算并显示其结果；单击“-”按钮，可实现两个数
的减法运算；单击“*”按钮，可实现两个数的乘法运算；单击“/”按钮，可实现两个数的
除法运算；单击“清空”按钮，可清空操作数和结果；单击“退出”按钮退出程序运行。
三、实验步骤
（1）启动Microsoft Visual Basic 6.0，新建一个工程。
（2）创建用户界面。参照图1-2所示添加控件并进行布置。
图1-2
在窗体Form1适当位置上添加框架控件Frame1和Frame2，添加标签Label1、Label2、
Label3、Label4，添加文本框（TextBox）Text1和Text2，添加命令按钮（CommandButton）
Command1、Command2、Command3、Command4、Command5、Command6。
（3）设置界面上各个对象的属性。如表1-1所设置。效果如图1-3所示。
表1-1
对象
Form1
Frame1
Frame2
Label1
Label2
Label3
Label4
Text1
属性名称
Caption
Caption
Caption
Caption
Caption
Caption
Caption
Text
属性值
简易计算器
输入数据
选择计算
操作数一：
操作数二：
结果：
（空）
（空）
对象
Text2
Command1
Command2
Command3
Command4
Command5
Command6
属性名称
Text
Caption
Caption
Caption
Caption
Caption
Caption
属性值
（空）
+
-
*
/
清空
退出
图1-3
（4）编写对象相应事件的程序代码
要实现题目要求的功能，需要在代码编辑器中编写6个命令按钮的单击事件过程。代码
如图1-4或图1-5所示。
（5）保存工程。
输入代码完成后，应该先保存工程，再运行程序，以避免因死机等意外发生而造成损失。
一个工程由若干文件组成，保存文件的顺序应该是先保存窗体文件（），再保存文件
工程文件（），而保存地点则可自由安排。
（6）测试和调试应用程序。
（7）生成可执行程序。
执行“文件”—>“生成”菜单命令，根据提示进行操作即可将本工程编译成能
脱离VB环境而独立运行的可执行程序。
图1-4
图1-5
【补充知识点】
类定义了对象的属性、方法和事件。
在VB系统中，已经设计好了大量的类，如窗体、菜单以及工具箱中的各个控件等。
类是创建对象实例的模板
对象是类的实例。控件类的实例化，可以得到真正的控件对象。实例化过程就是在工具
箱选中某一控件类按钮，然后在窗体上拖动鼠标绘制一个控件的过程。绘制的控件就是对象。
对象是具有某些特征和行为的实体。某些特征指的是对象的一组属性的取值，某些行为
指的是对象的方法。同类对象具有一组相同的属性，但不会有完全相同的属性值，即特征各
异。
//对象的命名：按VB约定，名称必须是以字母或汉字开头的由字母、汉字、数字、下
划线组成的串，其长度≦127个字符。
//创建对象后可以进一步设置和修改对象的属性，有以下两种方法：
（1） 在设计阶段利用属性窗口设置和修改属性值。
（2） 在程序中用赋值语句给属性赋值，其格式为：对象名.属性=属性值
如在Command1的单击事件过程中，给Label4的Caption属性赋值，代码如下：
Private Sub Command1_Click( )
n = Val(Text1) + Val(Text2)
End Sub
大部分属性既可以在属性窗口中设置，也可以在程序中设置，如n属性。
也有一些只能在属性窗口中设置，不能在程序中设置，如对象的Name属性。还有一些只能
在程序中设置，不能在属性窗口中设置，如ListBox的ListIndex。
//基本数据类型（PPT第13页）
数据类型
整
数
实
数
字节型
整型
长整型
单精度型
双精度型
货币型
字符型
逻辑型
日期型
对象型
变体型
//Dim f As Single
用single作为数据类型（字符串变量）进行声明
如5/3=1.666667
类型名称 类型符号 存储空间
Byte
Integer
Long
Single
Double
Currency
String
Boolean
Date
Object
Variant
%
&
！
#
@
$
1B
2B
4B
4B
8B
8B
与串长度
有关
2B
8B
4B
≧16B
范围 精度
0～2
8
-1
-2
15
～2
15
-1
-2
31
～2
31
-1
略 7位有效数字
略 15位有效数字
略
True或False
100年1月1日~9999年12月31日
任何对象引用
数值型可达Double型的范围，变体
型是VB数据的缺省数据类型，它
可以存储各种类型的数据。
数
值
型
Dim 用在局部变量或模块级变量的声明中
// n = Val() / Val()
此处用隐式声明变量，在VB中，允许不显示声明而直接使用变量，此时VB会把该变
量指定为变体（Variant）数据类型，并默认为局部变量。
如5/3=1.66666666666667
//Val（）函数
格式：Val（c）
功能：将数据字符串转换成数值
说明：C为字符串类型的参数，函数返回值为数值型数据。
函数类型：Double型
Val( )函数将数字字符串转换为数值型数据，是从第一个字符开始截取，遇到非数值字符（第
一个表示指数的E、e、D、d除外）时停止，返回已截取的数值作为其值。
例如：
Val（”a45”）的值为0
Val（”45a12”）的值为45
Val（”3e2”）的值为300 3*10
2
Val（”3ee2”）的值为3
//使用TextBox输入数据
程序运行时在应用程序界面上，使用文本框（TextBox）接收用户从键盘上输入的数据，文
本框的Text属性（字符类型）为输入的内容，供程序进行处理。
例如：
Dim Sname As String，age As Integer
Sname= ‘中存有用户输入的数据
age=Val（） ‘用Val（）函数将Text2中字符串转换成数值
版权声明：本文标题：使用VB 设计一个简易计算器 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://roclinux.cn/b/1711528314a598461.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。
发表评论