机械热化基本控件.pptxVIP

学习要求—要求读者通过本章的学习，掌握VB基本控件的特点、常用属性、事件和方法，并能够熟练地运用这些基本控件编写各种VB应用程序以解决实际问题。 学习提示—Visual Basic为我们设计程序界面、调用系统资源提供了强大的工具—控件。控件是VB程序设计的基础，也是VB提供给我们的一种可视化编程工具。VB常用的基本控件有：文本框、标签框、命令按钮、单选按钮、复选框和框架控件等。各种类型的控件都有其特殊的属性、事件和方法。 主要内容—本章介绍了部分基本控件的特点及其使用用法，基本控件包括：文本框、标签框、命令按钮、单选按钮、复选框、框架、图形控件、选择控件、文件系统控件、定时器控件及滚动条等常用控件。;第一章文本框和标签框;文本框的常用属性有：;4. MaxLength属性：设置文本框中用户可以输入的字符串长度是否受到限制。缺省值为0，表示该文本框中字符串长度只受操作系统内存的限制；若该属性被设置为大于0的整数，则表示文本框中能够输入输出的最大字符数。 5. MultiLine属性：设置文本框是单行方式还是多行方式，有True和False两种属性值。设置为True时文本框以多行文本方式显示文本，一行显示不下的内容会自动换到下行显示；否则，以单行方式显示，超出文本框宽度的部分会被截掉。 6. PasswordChar属性：该属性用来设置是否在文本框控件中显示用户键入的实际字符。如果为该属性设置了某一字符,那么无论Text属性值是什么，在文本框中都只显示指定字符。;（三） 文本框的常用事件 1. Change事件 例题3-4 设计一个程序，窗体上有两个文本框和两个命令按钮，窗体外观如图3-4所示。当程序运行时，用户在第一个文本框内输入信息时，立即在第二个文本框中显示相同的内容；在第二个文本框中输入信息时，立即在第一个文本框中显示相同的内容 ;（1）界面设计见图3-4； ;（2）属性设置见表3-5； ;（3）编写事件过程代码如下： Private Sub txtShow1_Change() txtShow2 = txtShow1 End Sub Private Sub txtShow2_Change() txtShow1 = txtShow2 End Sub Private Sub cmdClear_Click() txtShow1 = txtShow2 = End Sub Private Sub cmdExit_Click() End End Sub;2. KeyPress事件 我们在文本框内输入数据时，难免会出现错误的数据。怎样判断、检查输入数据是否正确有效呢？文本框控件支持KeyPress事件，该事件识别从键盘上输入的字符。每当用户从键盘上敲入一个字符，就触发KeyPress事件。我们可以通过相应的事件过程进行数据校验。 例题3-5 设计一个程序，窗体上有一个文本框。运行程序时，当向文本框中输入字母时，在文本框中显示数字0，输入其他字符时不予显示，即不接受其他字符。 分析：大写26个英文字母的ASCII码值在65与90之间，小写26个英文字母的ASCII码值在97与122之间，均为连续的字符。如果用户输入的英文字母的ASCII值在此范围内，说明输入了字母字符，对应的显示数字0，否则不予显示。 1）界面设计如图3-5所示，由窗体加文本框(txtInfo)组成，文本框单行、多行均可。 ;图3-5文本框的KeyPress事件应用程序界面; （2）编写事件代码如下： Dim t As String ‘定义窗体级变量t Private Sub txtInfo_Change() txtInfo = t End Sub Private Sub txtInfo_KeyPress(KeyAscii As Integer) c = Chr$(KeyAscii) If (c = a And c = z) Or (c = A And c = Z) Then t = t + 0 Else t = t End If 当用户按下键盘键的瞬间，产生该事件。KeyDown事件不仅能响应全部键盘键，而且能带回键代码。通过参数KeyCode和Shift能够判断用户按下的是哪个键。当用户释放键盘键的瞬间激发此事件。KeyUp事件的其他性能与KeyDown事件相同。 ; 文本框所能识别的主要事件有： Change，Click，DblClick，GotFocus，KeyPress，LostFocus，MouseDown，MouseUP，MouseMove等等。 文本框控件最常用的方法是SetFocus，其作用是把焦点设置到指定的对