第6章 Visual Basic窗体和常用控件的使用

2.窗体的常用属性 2.窗体的常用属性
● 见课本P124
●
Icon属性的使用
3.窗体的事件 3.窗体的事件
1、Load事件和Unload事件 2、Activate(活动事件)和Deactivate(非活动事件) 3、Resize事件
4. 窗体的方法及操作语句
1）Load语句 Load语句的作用是将一个窗体装入内存，但并不显示窗体 ，其语法格式为： Load 窗体名称 2）Unload语句(P176) Unload语句的功能与Load语句相反，是将窗体从内存中删 除。Unload语句的语法格式为： Unload 窗体名称 卸载后的窗体，由于在内存中已不复存在，故除非重新加载 ，否则不能再做任何引用。
第6章 窗体和常用控件的使用
◆窗体及窗体设计 窗体及窗体设计 ◆文本框、标签框、命令按钮的使用 文本框、 文本框 标签框、 单选按钮、复选框、 ◆单选按钮、复选框、框架控件的使用 ◆列表框和组合框的使用 ◆滚动条的使用 ◆计时器的使用
窗体及窗体设计
1. 添加窗体
其方法有： 其方法有：
工程→添加窗体” 1）选择 “工程→添加窗体” 菜单命令。 菜单命令。 单击工具条上的“ 2）单击工具条上的“添加 窗体” 窗体”按钮 。 右击“ 3）右击“工程资源管理器 窗口” 选择快捷菜单“ 窗口”，选择快捷菜单“添加 |添加窗体”命令。 添加窗体”命令。
返回目录
3 ） Style属性 ： 与命令按钮一样 ， 当 Style属性取值为 1 Style属性 与命令按钮一样， Style属性取值为 属性： 属性取值为1 单选钮变成命令按钮形状。 时，单选钮变成命令按钮形状。
2.单选按钮－常用事件： 单选按钮－常用事件：
常用事件是 Click 举例单选按钮的使用： 举例单选按钮的使用： Private Sub Option1_Click() Text1.FontSize = 20 Text1.FontBold = True End Sub 举例（单选按钮文件夹） 举例（单选按钮文件夹）
二、复选框
－ CheckBox
复选框与单选按钮不同， 复选框与单选按钮不同 ， 在同一容器中的复选 框没有排它性，可对每个复选框做出独立的选择。 框没有排它性，可对每个复选框做出独立的选择。
1.复选框－常用属性： 复选框－常用属性：
1）Caption属性：与单选按钮相同。 ） 属性： 属性 与单选按钮相同。 2）Value属性：用来表示复选框的状态。取值有： ） 属性： 属性 用来表示复选框的状态。取值有： 0 - 未被选中 缺省值 未被选中(缺省值 缺省值) 1 - 选定 2 – 灰色 Style属性 与单选按钮相同。 属性： 3）Style属性：与单选按钮相同。
常用标准控件－文本框TextBox 常用标准控件－文本框TextBox
2. 文本框 －常用事件 ：
（1）Change(默认事件)：改变文本框内容时发生 Change(默认事件 默认事件) KeyPress： （2）KeyPress：在文本框中按键盘上的键时发生 （3）Lostfocus：文本框失去焦点时发生 Lostfocus： Gotfocus： （4）Gotfocus：文本框获得焦点时发生 焦点是接收用户鼠标或键盘输入的能力。 焦点是接收用户鼠标或键盘输入的能力。 Click： （5）Click：
返回目录
（4）Autosize属性：设置标签是否自动改变大小以显 Autosize属性 属性： 示其全部内容。取值为True或False。举例说明。 示其全部内容。取值为True或False。举例说明。
2. 标签的主要事件： 标签的主要事件： Label 控件可以接受单击（Click）、双 控件可以接受单击（ ）、双 ）、 击（DblClick）和改变（Change）事件。但 ）和改变（ ）事件。 Label 控件的主要作用是显示文本，一般不需 控件的主要作用是显示文本， 要编写事件过程代码。 要编写事件过程代码
（1）Caption属性：设置在标签控件中显示的文本 Caption属性 属性： （2）Alignment属性：设置标签中文本的对齐方式 Alignment属性 属性： （0-左对齐，1-右对齐，2-居中） 左对齐， 右对齐， 居中） （3）BackStyle属性：设置标签控件背景是否透明 BackStyle属性 属性： （0-透明，1-不透明为默认值） 透明， 不透明为默认值） 标签“ 例 ： 标签 “ 用户名 称 ” 和 “ 密码 ” 是透 明的
常用标准控件－应用举例1 常用标准控件－应用举例1
[例] 同步显示
两个文本框： 两个文本框： MultiLine设为 MultiLine设为True 设为True 设为2 ScrollBars设为 ScrollBars设为2
Private Sub Text1_Change() Text1 Text2 Text2.Text = Text1.Text Text1 End Sub Private Sub Command1_Click() '重新输入 Command1 Text1 Text1.Text = "" Text1 Text1.SetFocus End Sub
Private Sub fx2_Click() If fx2.Value = 1 Then wb1.FontItalic = True Else wb1.FontItalic = False End If End Sub Private Sub fx3_Click() If fx3.Value = 1 Then wb1.FontBold = True Else wb1.FontBold = 百度文库alse End If End Sub
2.复选框－常用事件：也是Click 复选框－常用事件：也是Click
每单击一次复选框都产生一个Click事件。 事件。 每单击一次复选框都产生一个 事件
复选框举例
1. 设计用户界面： 设计用户界面： 2. 编写代码： 编写代码：
Private Sub fx1_Click() If fx1.Value = 1 Then wb1.FontUnderline = True Else wb1.FontUnderline = False End If End Sub
3. 文本框 －常用方法： 常用方法：
SetFocus是文本框中较常用的方法 格式为： SetFocus是文本框中较常用的方法，格式为： 是文本框中较常用的方法， [对象名.] SetFocus 对象名. 该方法可以把输入光标（焦点） 该方法可以把输入光标（焦点）移到指定的文本框中
返回目录
举例： 举例：
返回目录
单选按钮、复选框、框架控件 单选按钮、复选框、
一、 单选按钮 －OptionButton
单选按钮的功能用于在一组相关的选项中实现单 或互斥） 选择， 因此， 项 （ 或互斥 ） 选择 ， 因此 ， 单选按钮控件总是成组出 现的。位于同一容器中的单选按钮，VB视其为一组 视其为一组。 现的。位于同一容器中的单选按钮，VB视其为一组。
返回目录
常用标准控件－应用举例2 常用标准控件－应用举例2
[例] 考生登录 例
Private Sub Txtcode_LostFocus() If Len(Txtcode.Text) < 8 Then Lblsm.Caption = "准考证号必须输入 长度 位！" 准考证号必须输入,长度 准考证号必须输入 长度8位 Txtcode.SetFocus End If End Sub
常用标准控件－文本框TextBox 常用标准控件－文本框TextBox
标准控件由系统提供，又称为内部控件。 标准控件由系统提供，又称为内部控件。 工具箱中的控件均为内部控件） （工具箱中的控件均为内部控件）。 1. 文本框 －常用属性 ：
（1）Text：设置文本框中显示的内容 Text： （2）MultiLine：设置是否能输入或显示多行文本 MultiLine： 取值True或 缺省值) 取值True或 False (缺省值) （3）ScrollBars：设置多行文本框中是否出现滚动 ScrollBars： 条 返回目录 没有， 水平， 垂直， 水平和垂直） （0-没有，1-水平，2-垂直，3-水平和垂直） ScrollBars属性只有在 ScrollBars属性只有在MultiLine取True时才起作用 属性只有在MultiLine取True时才起作用
Private Sub Text1_Change() Text2.Text = UCase(Text1.Text) End Sub
常用标准控件－标签Label 常用标准控件－标签Label
1. 标签 常用属性： 常用属性：
标签控件主要用来显示说明文字， 标签控件主要用来显示说明文字，因 此一般不对其进行事件处理。 此一般不对其进行事件处理。
文本框的3个动态属性 文本框的 个动态属性 SelLength、SelStart、SelText为文本框的 个动态 为文本框的3个动态 、 、 为文本框的 属性，不在属性窗口，只能在程序执行时动态设置。 属性，不在属性窗口，只能在程序执行时动态设置。 用来记录在文本框中进行文本的选择操作。 用来记录在文本框中进行文本的选择操作。 SelLength：记录用户在文本框中选定的字符数。 ：记录用户在文本框中选定的字符数。 SelStart：记录用户选定文本的起始位置。第一个字 ：记录用户选定文本的起始位置。 符的位置以0计算 后面的以此类推。 计算， 符的位置以0计算，后面的以此类推。 SelText：记录用户选定文本的内容。 ：记录用户选定文本的内容。 Private Sub Text2_Click() Text2.Text = Text1.SelText Print Text1.SelStart Print Text1.SelLength End Sub
3）Show方法－显示窗体 Show方法的语法格式为： [窗体名称.]Show 4）Hide方法—隐藏窗体 语法格式： [窗体名称.]Hide 5) Move方法—移动窗体或控件（见图片） 语法格式： 对象.Move left, top, width, height
5. 设置启动窗体
在具有多个窗体的应用程序中，各个窗体之间是并列关 系。程序运行时，首先执行的窗体默认为第一个创建的窗口 Form1，称为启动窗体。根据需要可以指定其他窗体或Main 子过程为启动对象。选择“工程→工程属性”命令。 选择“工程→工程属性”命令。
1. 单选按钮－常用属性： 单选按钮－常用属性：
1） Caption属性 ： 用来标注该选项的内容 。 可在单选 ） 属性： 属性 用来标注该选项的内容。 按钮的左边、右边出现，这由Alignment属性取值决定。 属性取值决定。 按钮的左边、右边出现，这由 属性取值决定 2） Value属性 ： 用来记录是否选择了某个单选按钮 ， ） 属性： 属性 用来记录是否选择了某个单选按钮， 若其Value属性取值为 属性取值为True，则这一组单选按钮中选择 若其 属性取值为 ， 了此按钮，默认取值为False (未被选中 。 未被选中) 了此按钮，默认取值为 未被选中
常用标准控件－命令按钮 常用标准控件－
命令按钮 CommandButton
返回目录
快捷键作用（访问热键）： 快捷键作用（访问热键）： Alt+S ＝单击“开始”按 单击“开始” 钮 Alt+X ＝单击“Exit”按钮 单击“ 按钮
命令按钮 CommandButton－常用事件： 常用事件：
命令按钮的默认事件是Click( 单击 命令按钮的默认事件是 Click(单击 ) ， 不支持双击 单击) 事件。 事件。
（ 4 ） Locked ： 设置是否允许用户编辑文本框中的 Locked： 文本。 取值True（锁定对文本框的修改功能， 文本。 取值True（锁定对文本框的修改功能， 即不能编辑文本框） 缺省值) 即不能编辑文本框）或 False (缺省值) （5）Passwordchar：设置密码字符 Passwordchar： 默认值为空， 默认值为空，即用户在文本框里键入什么字 符就显示什么字符。若取非空值，如取“ 符就显示什么字符。若取非空值，如取“*”号， 则用户正常键入字符，显示的是星号串。 则用户正常键入字符，显示的是星号串。