第六课：简单的计算器.doc

第二课：简单计算器
大家都见过计算器，今天我们就来制作一个属于自己的计算器吧。

第一步
打开VB6.0中文版，新建一个标准EXE窗体。如图2-1

图2-1
第二步
　在窗体的属性窗中设置窗体的Caption(标题)为：简单的计算器,如图2-2所示。

对象框
属性显示方式

属性列表

图2-2
第三步
在工具箱中用鼠标左键单击TextBox,然后在窗体上拖拉画出TextBox1,重复第三步画出TextBox2。和上节课一样分别画出加、减、乘、除按钮，如图2-3所示。

图2-3
第四步
分别在属性框中把四个按钮的Caption(标题)改为：加、减、乘、除，删除TextBox1、TextBox2、TextBox3的Caption。如图2-4

图2-4
第五步
双击Command1(加按钮),进入程序代码窗口，在光标处输入代码：Text3.Text = Val(Text1.Text) + Val(Text2.Text)。如图2-5所示：

图2-5
Val 是指将TextBox 中的内容转换为计算机可以直接进行计算的数字，从而进行计算。而+表示把TextBox1和TextBox2中的内容合到一起组成新的字符。例如：字符A+B表示A和B组合成一个新的字符AB。
小知识

第六步
按照同样的方法在减、乘、除按钮上双击，分别输入代码：
Text3.Text=Text1.Text-Text2.Text
Text3.Text=Text1.Text*Text2.Text
Text3.Text=Text1.Text/Text2.Text
效果就像图2-6一样。

图2-6
第七步
点击工具栏的运行按钮，运行程序。结果如图2-8。

每次计算完成后，TextBox删除里面的数字很麻烦，怎么样才能使每次计算完后自动清除TextBox框里面的数字呢？