零基础学Visual Basic第2版
上QQ阅读APP看书,第一时间看更新

1.6 综合练习

【实例1.2】做一个普通的计算器界面,能够实现数字和运算符的输入功能。使用户通过单击计算器键盘上面的数字或运算符按钮,就能够在计算器的显示屏上显示对应的数字或运算符;并能够清除输入的内容。

【运行效果】图1.15是计算器的运行界面。本练习是一个简单的界面输入示例,不具备计算功能。读者通过学习更多的知识以后可以完善本练习的功能。

【实例目的】通过本练习,读者可以进一步掌握VB界面的设计方法,熟悉控件的3个基本要素。本练习主要涉及CommandBox控件和TextBox控件,通过综合练习,读者可以巩固CommandBox控件的Click事件编程方法以及TextBox控件的Text属性用法。

【实现步骤】计算器界面的实现过程如下。

(1)向窗体中添加TextBox控件,作为计算器的显示屏,数据或运算符的显示通过其Text属性实现。

(2)将TextBox控件的Alignment属性设置为“1-Right Justify”,这样才能从右边开始显示数据或运算符。

(3)向窗体中添加CommandBox控件,作为计算器键盘的按钮。

图1.15 计算器示例运行界面

(4)在对应按钮的Click事件中,编程实现数据或运算符的输入,如下所示。

        01   '输入1
        02   Private Sub cmd1_Click()
        03         txtScreen = txtScreen + "1"
        04   End Sub
        05
        06   '输入2
        07   Private Sub cmd2_Click()
        08     txtScreen = txtScreen + "2"
        09   End Sub
        10
        11   '输入/
        12   Private Sub cmdDivide_Click()
        13         txtScreen = txtScreen + "/"
        14   End Sub
        15
        16   '输入=
        17   Private Sub cmdEqual_Click()
        18         txtScreen = txtScreen + "="
        19   End Sub

【代码说明】计算器中的每个按钮都需要针对一个事件。代码第2~4行是针对“1”按钮的事件;代码第7~9行是针对“2”按钮的事件;代码第12~14行是针对“/”按钮的事件;代码第17~19是针对“=”按钮的事件。读者可以参照上述代码完成其余部分。

说明

本练习使用TextBox控件的Text属性显示数据或运算符,但是上述给出的代码中没有txtScreen. Text出现。这是因为VB允许程序员省略.Text,这里的txtScreen与txtScreen.Text作用是等价的。