上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作用是等价的。