2.2 一个简单的加法器程序

【例2-1】设计一个简单的加法器。

我们以上述分析的加法器为例，给出 VB 程序。这里不考虑可能产生的输入错误和运算错误。

1.加法器界面设计

图2.1给出了加法器的程序界面，使用了5个标签控件（Label）来标注界面上的加数、和数、加号和等号，界面直观。三个文本框控件（TextBox）存放两个加数及和数。两个命令按钮（Button）控件实现“计算”、“退出”操作。表2.1给出了其所有对象的属性设置。

我们先使用与本题有关的“控件”。只要按照表2.1中所示的各控件属性进行设置，或使用默认值，调整好窗体的尺寸和控件在窗体中的尺寸与位置，就完成了我们所要求的图2.1所示的界面设计。

2.编写程序代码

这里我们假设程序运行是按照以下顺序进行的。

❶ 程序启动后，显示“简单加法器”界面。

❷ 在“加数1”下的文本框中输入第1个数。

❸ 在“加数2”下的文本框中输入第2个数。

❹ 单击“计算”，将相加的结果在“和数”下的文本框中输出。可重复❷～❹，进行反复计算。

❺ 单击“退出”，结束加法器程序的运行。

本例完成以上操作的程序代码，是通过“按钮（Button）”的单击事件而触发的，也就是单击“计算”或“退出”按钮时，进入相应的程序代码完成上述操作任务。

程序设计时，双击窗体上的按钮控件，或者在按钮控件上使用快捷菜单，选择“查看代码”，IDE自动打开代码编辑界面，进入对应按钮的事件过程，如图2.2所示。

① 类名框：列出这个模块中已添加的对象名称，当为某个对象编写程序代码时，这个框中显示其名称（Name）。图2.2是指示选择“计算”按钮（名称为Button1）。

②方法名称框：给出类名框中显示对象的所有事件或方法的过程名称。图2.2列出的Click，就是当鼠标单击“计算”按钮时将执行的过程，叫Click事件过程。

③方法分隔线：如果有多个方法（过程），自动使用方法分界线隔开。在图2.2中，分隔线下方为“退出”按钮（Button2）的Click方法。

④ 光标位置：与一般的文本编辑器相同，光标位置是程序代码编辑的位置。

在VB的Windows窗体应用程序中，一个窗体也是一个类，所以程序代码的格式为：

        Public Class 窗体名
          程序代码
        End Class

本书后面在列出程序代码时，不再写出“Public Class 窗体名”和“End Class”。

例2-1的“计算”和“结束”命令按钮Click事件的程序代码如下所示。

        Private Sub Button1_Click(ByVal sender As Object,ByVal e As System.EventArgs)Handles Button1.Click
          TextBox3.Text=Val(TextBox1.Text)+Val(TextBox2.Text)          '实现加法
        End Sub
        Private Sub Button2_Click(ByVal sender As Object,ByVal e As System.EventArgs)Handles Button2.Click
          End                                     '终止程序执行
        End Sub

我们在程序代码后面使用英文单引号“'”后跟文字表示注释（请参见3.3节）。

由于Button1_Click中参数过长，不方便在一行中书写，为此参数：

        ByVal sender As Object,ByVal e As System.EventArgs

我们将省略，用……来表示，即使用：

        Private Sub Button1_Click(……)Handles Button1.Click
          程序代码
        End Sub

3.程序代码的简单说明

例2-1程序由命令按钮“计算”和“退出”两个代码段组成，它们分别代表两个按钮被单击的处理过程。

单击“计算”按钮后，执行Button1_Click()过程。如表2.1所示，“计算”按钮的“(Name)”属性使用了默认值Button1，系统给这个过程命名为Sub Button1_Click()。其中，Sub取自Subroutine （或Sub-procedure），表示是一个子过程。

Button1_Click()过程中只有一条语句：

        TextBox3.Text=Val(TextBox1.Text)+Val(TextBox2.Text)

其含义是把输入加数1的文本框TextBox1中的内容加上加数2的文本框TextBox2中的内容，结果存放到TextBox3中。因为输入的是文本（即字符型），所以使用Val()函数（求值，Value）转换为数值型。

VB使用End Sub表示一个子过程的结束。Private表示过程是“私有”的。

“退出”按钮被单击后，执行 Button2_Click()中的代码，这个过程只有一条 End 语句，用来结束整个程序的运行。

4.执行程序

单击IDE工具栏上的“启动调试”按钮，或在“调试”菜单中选择“启动调试”命令，程序被执行，运行界面（窗口）如图2.3所示。可以重新输入加数1和加数2，单击“计算”，再次执行加法计算。单击“退出”，程序结束，窗口消失。

注意，一个良好的编程习惯从命名开始。通常有一些命名的参考规则：

①控件和窗体的名称使用英文助记符，可以重新命名。

② 命名最好能够与对象类型一致，便于在程序中辨认，当然可以使用默认命名。

③ 一般对命名中的首字母采用大写。