l5章vb编程学习.pptVIP

* * 第5章 文本框和标签的使用 5.1 使用文本框处理字符信息 5.2 使用标签控件显示字符信息 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 【例1】设计一个程序，由用户从键盘上输入两个数，计算这两个数的和，并将计算结果显示出来。 5.1 使用文本框处理字符信息 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. Private Sub cmdAdd_Click() op1 = Val(txtOp1.Text) op2 = Val(txtOp3.Text) sum = op1 + op2 txtResult.Text = Str$(sum) End Sub Private Sub cmdClear_Click() txtOp1.Text = ″″ txtOp3.Text = ″″ txtResult.Text = ″″ End Sub Private Sub cmdExit_Click() End End Sub Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. 为了输入数据，可先单击文本框txtOp1，使光标在文本框中闪烁，表示此文本框是“激活”的，或称“焦点”在该文本框上。 此时可以从键盘将被加数（如12）输入到文本框txtOp1中。 再单击文本框txtOp3，使光标在其上闪烁，然后用键盘输入加数（如36）， 再单击“加法运算”命令按钮，以执行cmdAdd_click事件过程，在文本框txtResult中显示相加之和。 在计算完一个题目后，如果还要继续计算，应再单击“清除”命令按钮，以便清除原有数据。 设置焦点 为了方便用户，往往容许用户既能使用鼠标操作，又能使用键盘操作。 可以利用Visual Basic提供的SetFocus（设置焦点）方法和TabStop、TabIndex属性来实现这个目的。 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. （1） 用SetFocus方法设置焦点的方法是，在cmdClear 事件过程的最后加入以下语句： txtOp1.SetFocus 这样，cmdClear过程就变成如下过程： Private Sub cmdClear_Click() txtOp1.Text = ″″ txtOp3.Text = ″″ txtResult.Text = ″″ txtOp1.SetFocus End Sub 这样，单击清除按钮以后焦点自动以东到txtop1 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. （2） 用TabIndex属性来控制当用户按下Tab键时焦点的转移顺序。 被加数输入后，用户可以按键盘上的Tab键，使光标跳到文本框3内。 文本框和命令按钮均有一个属性TabIndex，它是按照窗体内添加各控件的顺序自动确定的。 如果在窗体上画控件时的顺序为： 文本框1到5，然后是命令按钮1、2和3， 则，文本框1的TabIndex属性值为0， 文本框2的TabIndex属性值为1， 文本框3、4、5的TabIndex属性值依次为2、3、4， 命令按钮1、2、3的TabIndex属性值为5、6和7。 Evaluation only. Created with Aspose.Slides for .NET 3.5 Client Profile 5.2.0.0. Copyright 2004-2011 Aspose Pty Ltd. （3） 可以用TabStop属性来使某个控件“轮空”。 一般控件的TabStop属性的默认值为True（真），表示按Tab键时光