第章 基本输入输出控件.ppt

标签控件应用实例 【例3-8】学习标签框的边框属性BorderStyle及透明性属性BackStyle * 第3章 Visual Basic 基本控件 3.3 标签控件 （a） 无边框、透明 （b） 无边框、不透明 * 第3章 Visual Basic 基本控件 3.3 标签控件 标签控件应用实例 【例3-8】学习标签框的边框属性BorderStyle及透明性属性BackStyle （a） 有边框、透明 （b） 有边框、不透明 * 第3章 Visual Basic 基本控件 3.3 标签控件 1、设计窗体界面 2、设计控件属性 3、编写Click事件过程代码 * 第3章 Visual Basic 基本控件 3.3 标签控件 标签的标题 Private Sub Form_Load() Label1.Caption = Chr(13) Chr(10) 标签属性用法的例子 Label1.Caption = Label1.Caption Chr(13) Chr(10) Chr(13) Chr(10) _ Year(Date) 年 Month(Date) 月 Day(Date) 日 End Sub * 第3章 Visual Basic 基本控件 3.3 标签控件 无边框 Private Sub CmdBorder0_Click() Label1.BorderStyle = 0 CmdBorder0.Visible = False CmdBorder1.Visible = True End Sub 有边框 Private Sub CmdBorder1_Click() Label1.BorderStyle = 1 CmdBorder1.Visible = False CmdBorder0.Visible = True End Sub 不透明 Private Sub CmdOpaque_Click() Label1.BackStyle = 1 CmdTrans.Visible = True CmdOpaque.Visible = False End Sub 透明 Private Sub CmdTrans_Click() Label1.BackStyle = 0 CmdOpaque.Visible = True CmdTrans.Visible = False End Sub * 第3章 Visual Basic 基本控件 3.4 文本框控件 概念 文本框控件（TextBox）是VB系统最常用的控件之一，通常被用来输入和显示信息。显示的信息一般是可以被用户编辑修改的，响应Delete、BackSpace、PageUp、PageDown及上、下、左、右光标键。但如果将文本框的Locked属性设为True或Enabled属性设为False，则其内文本变为只读，就相当于标签控件的功能。 * 第3章 Visual Basic 基本控件 3.4 文本框控件 文本框控件的常用属性 属性名 说 明 Text MultiLine ScrollBars PasswordChar MaxLength Locked TabStop TabIndex SelStart SelLength SelText 文本框中包含的文本内容 该属性为True时，可以接收多行文本 MultiLine为True时有效 为文本框设置一个密码替代显示符，如*或#? 指定显示在文本框中的最多字符数，超出部分不接收? 值为True时，文本框中文本不可编辑? 值为False时，用户不可用Tab使文本框获得焦点? 返回或设置响应Tab键的顺序? 返回或设置所选择文本的起点? 返回或设置所选择文本的字符数 返回或设置被选择文本的内容 在设计时不可用 在设计时不可用 在设计时不可用 * 第3章 Visual Basic 基本控件 3.4 文本框控件 文本框控件的常用事件 Change 当向文本框输入新内容或在程序中重置Text属性值，使文本框的内容发生了改变时，将触发文本框的Change事件。 GotFocus 焦点是接受用户鼠标或键盘输入的能力。当用户用鼠标或用Tab键将输入焦点移动到文本框或按钮控件上时，将在控件上触发GotFocus事件。 LostFocus 当控件失去焦