1、第三讲 界面设计,主要内容 掌握窗体的常用属性、事件和方法 掌握文本框、标签、命令按钮、列表框、 组合框、图片框、单选按钮和复选框的常 用属性、事件和方法 掌握菜单的制作 了解多窗体、MDI窗体的使用,第一部分 窗 体 在VB集成环境中，窗体和控件是构成界面的要素。窗体是一个必不可少的对象，具有多种属性、方法和事件，同时又是其它控件（对象）的载体（容器）。,一、创建窗体,1 属性、方法和事件 1）窗体常用属性 Name:名称属性，缺省为Form1、Form2在程序代码中，该属性是窗体对象的标识。可自行命名窗体，规则是以字母开头，可包含数字和下划线，不能包含空格和标点符号。 Caption:标题
2、属性，缺省为窗体名称，为显示在窗体标题栏的字符串。 BackColor:背景色属性，可在调色板中选择。* ForeColor:前景色属性，可在调色板中选择。 BorderStyle:边框风格属性，有六种选择。 Enable:活动属性，缺省为“ True”;当设置为“False”时，窗体将不能被访问。 Visible: 窗体可见True，窗体不可见Flase.,Icon:图标属性，为显示在标题栏最左端的图标，缺省为VB图标。 ControlBox:窗体左上角是否出现控制按钮, True出现, False不出现. MaxButton、MinButton:最大和最小化按钮是否出现。ControlBo
3、x为True。 Picture:选择图片作为窗体背景。 * Font:设置字体。（字号、字体、字体样式） FontSize:设置字号。 FontBold：黑体。FontItalic：斜体。 CurrentX、CurrentY：控制数据输出的位置，单位：特维。 Left、Top:窗体左上角的坐标属性，单位为特维。 Height、Width:高度和宽度属性，单位也为特维。,BorderStyle属性的六种设置值 常 数 设置值 描 述 vbBSNone 0 无（没有边框或与边框相关的元素）。 vbFixedSingle 1 固定单边框。可以包含控制菜单框， 标题栏和关闭按钮，不能改变尺寸。 vbS
4、izable 2 可调整的边框。可以改变窗体大小。 （缺省值） vbFixedDouble 3 固定对话框。可以包含控制菜单框和 标题栏，不能改变尺寸。 vbFixedToolWindow 4 固定工具窗口。不能改变尺寸。显示 关闭按钮并用缩小的字体显示标题栏。 窗体在 Windows 95 的任务条中不显 示。 vbSizableToolWindow 5 可变尺寸工具窗口。可变大小。显示 关闭按钮并用缩小的字体显示标题栏。 窗体在 Windows 95 的任务条中不显 示。,p.15表2-2 （ 演示）,2 设置窗体属性 设置属性通常有两种方法，一个是在设计态时通过属性窗口进行设置；另一个是
5、在程序执行过程中改变属性值，即在程序代码中设置属性值。 （1）打开属性窗口的四种方法 单击工具栏上“属性窗口”图标 按快捷键“F4” 在“视图”菜单中选中“属性窗口”命令 在快捷菜单中选中“属性”命令,（2）在程序代码中改变属性值，使用如下赋值语句： 格式： Object.Property=Expression 说明 Object:对象名 Property:要修改的属性名称 Expression:表达式，必须和属性类型一致，即属性是字符型，表达式也应是字符型；属性是逻辑型，表达式也应是逻辑型。,3 窗体的显示、隐藏、装载和卸载 1）窗体的显示与隐藏 程序代码中使用方法的格式为： Object.
6、Method 参数 例1：单击窗体1，显示窗体2。 Private Sub Form_Click Form2.Show End Sub 注意：通常产生事件过程时，建议不要自行输入程序头，而由系统自动产生。此外，命令按钮1产生的单击事件名为Command1_Click，命令按钮2产生的单击事件名为Command2_Click，但对于一个窗体，产生的事件过程名为Form_Click，而不是Form1_Click，这种特殊情况只会出现在窗体的事件过程中。,6 文本 1） 在窗体和图片框上显示文本 （1）使用Print方法 这是我们比较熟悉的一种方法。如 Print “This is a Form”
7、Picture1.Print “This is a Picture Box” （2）Cls方法 对象中创建出的文本和图形，可用该方法清除。,第二部分 VB常用控件,1）文本框（TextBox） 用途：用于接受输入的信息，或显示程序代码产生的信息。,（TextBox）常用属性,Name:名称属性 Text:文本属性，该属性为文本框的缺省属性，是文本框中显示的内容，32K PasswordChar:口令属性，缺省为空格，即用户可以看见输入的字符；若该属性值为其他字符，则输入时只能看见属性设置的字符。看不见输入的字符(常用“*”).但系统可获得真值。,MaxLength:最大长度属性，允许最大字符数
8、 MultiLine:多行属性，“True”允许多行输入 ScrollBars:滚动条属性，有四种选择，和多行属性“MultiLine”配合使用 Alignment:对齐属性，有三种选择 Locked:只读属性，“True”时不能输入、编辑,（TextBox）常用属性,ScrollBars属性的四种设置值 常数 设置值 描述 vbSBNone 0 （缺省值）无 vbHorizontal 1 水平滚动条 vbVertica 2 垂直滚动条 vbBoth 3 两种,演示 滚动条,注意:滚动条属性只有在多行属性为“True”时才有效,Alignmeng属性的三种设置值 常数 设置值 描述 vbLef
9、tJustify 0 （缺省值）文本左对齐。 vbRightJustify 1 文本右对齐 vbCenter 2 文本居中,注意Text没有 Caption属性,方法： SetFocus:设置焦点 事件： Change:当文本框内容发生变化时，就引发本事件 LostFocus:当焦点离开文本时，引发本事件 KeyPress：当焦点在文本框，并按下任何标准字符集的按键时会引发本事件 例:在窗体上放置2个文本框和命令按钮，在文本框1中输入口令，要求输入内容居中，并以星号显示。光标离开文本框1后，刚才输入的内容显示在文本框2中。 （程序名：口令） Private Sub Text1_LostFocu
10、s() Text2.Text= Text1.Text End Sub,2）标签（Label） 用途：在窗体上增加说明。 属性： Name: 名称属性。 Caption:标题属性。 Alignment:对齐属性，有三种选择(同文本框)。 AutoSize:大小自适应属性，当取值为“True”时，根据文本大小自动调整标签的大小(水平方向)，缺省为 “False”。 Wordwrap:折行属性,当取值为“True”时,可以换行,但AutoSize必须值为“True” BackStyle：背景式样，取值为“0”时透明， “1”时不透明,label常用方法：有Refresh、Move等，很少使用。 la
11、bel常用事件：有Click等事件，也很少使用。 3）命令按钮（CommandButton） 用途：用于执行命令，具体内容由相关代码决定。 属性： Caption:标题属性。 Cancel:取消按钮属性，当该属性为“True”时，按Esc键等同于单击此按钮。在一个窗体中，只能有一个命令按钮的该属性设置为“True”。缺省值为“False”。 Default:缺省属性。当该属性为“True”时，本按钮被设为焦点，按回车键等同于单击此按钮。在一个窗体中，也只能有一个命令按钮的该属性值为“True”.缺省值为“False”。,Enable:有效属性，当该属性为“False”时，命令按钮无效。缺省为“
12、True”。 Style与Picture：风格与图片属性。 普通按钮Style为“0”， Style为“1”可通过Picture属性设图片按钮，并可通过DisabledPicture 与 DownPIcture为按钮无效时和按下时设置各自的图片。 命令按钮常用方法： SetFocus:设置焦点。 命令按钮常用事件 Click:单击。,4）列表框（ListBox） 用途：列出可供用户选择的项目列表。 属性： Name:名称属性。 List:表属性，保存列表内容，可通过列表项序号进行访问。 对象名称.List(列表项序号) ListCount:列表项数目属性。 ListIndex:列表项索引属性。
13、为选中的列表项的序号，第一个为，若未选中任何列表项，该属性值为。 Text:正文属性。为选中列表项的文本。 Sorted:排序属性，为“True”时列表项按ASCII码顺序排列。 Selected:选中属性，选中的列表项为“True”否则为 “False”,格式同List,但是运行态属性。,ListBox常用方法： AddItem:添加列表项。 格式为： 列表名.AddItem ,插入位置 Clear:清除列表所有内容。 RemoveItem:删除列表项。 格式为： 列表名.RemoveItem ,ListBox常用事件： Click：单击事件。 注意：在List属性框中输入数据换行时按Ctr
14、l+Enter,5）组合框（ComboBox） 用途：和列表框类似。 属性： Style:外观属性，有三种选择。 Text:文本属性。为用户从列表中选取的文本或输入在文本框中的内容。 方法：同列表框。 事件：同文本框和列表框。,常数 值 描述 vbComboDropDown 0 （缺省值）下拉式组合框。包括一个下 拉式列表和一个文本框。可以从列表选 择或在文本框中输入。 vbComboSimple 1 简单组合框。包括一个文本框和一个不 能下拉的列表。可以从列表中选择或在、 文本框中输入。简单 组合框的大小包括 编辑和列表部分。按缺省规定，简单组 合框的大小调整在没有任何列表显示的 状态。增加
15、 Height 属性值可显示列表 的更多部分。 vbComboDrop-DownList 2 下拉式列表。这种样式仅允许从下拉式 列表中选择。,组合框Style属性的三种选择,6）图象（Image）、图片框（PictureBox） 用途：图象控件显示来自位图(.bmp)、图标(.ico)或者元文件；图片控件可以显示文字、图片以及来自增强的元文件、JPEG 或 GIF 文件的图形。如果控件不足以显示整幅图象，则裁剪图象以适应控件的大小，还可创建动画。 PictureBox属性： Align:对齐属性，指图片框在窗体上的位置。有无、上、下、左和右五种选择。 Picture:图片属性，为要显示的图片
16、名（演示）。 PictureBox方法： Move：移动 Print（和窗体的Print方法的使用相同） Cls：清除,方法： Move、Refresh、Setfocus等 事件： Click 注意： （1）若一个窗体上有两组互不相干的单选按钮，必须将他们分别放置在框架（Frame）中； （2）一般情况下，一组单选按钮中设置一个按钮为缺省按钮，即它的Value属性初始状态为“True”，根据这个设定设置整个应用程序的初始状态。,7)单选按钮（OptionButton） 用途：从一组互斥的选项中选择一个。 属性： Caption:标题属性。 Value:取值属性。当单选按钮被选中时，该属性为“T
17、rue”，否则为“False”,8) 框架控件(Frame) 用途:放置其它控件对象。 属性： Caption:标题属性。 Enabled:设为“False”时，框架与其中的控件一起被禁用。 说明： 首先创建框架，然后再将控件放入其中。产生控件数组时应用复制的方法，但在首次粘帖之前必须用鼠标单击框架。（若拖动框架所有其中的控件都移动，则控件数组创建成功。）,9）复选框（CheckBox） 用途：从一组选项中选择一个或多个。 属性： Caption:标题属性。 Value:取值属性，表示复选框的状态，有三个选择。,Value属性的三种选择 值 描述 0 未选中（缺省值） 1 选中 2 无效（变成
18、灰色）,例：利用复选框控制文本框汉字的粗体和斜体。 (演示：字体（5.12) 程序说明：因为复选框的单击结果有两种，所以在程序中使用了一种判断结构。而单选按钮则不存在这种情况。,10）滚动条（HScrollBar/VScrollBar) 用途：常用于选择数值。 属性： Max:数值区域的最大值。 Min:数值区域的最小值。 Value:返回滚动条的取值。 常用事件： Chang: 滑块释放后（单击调节箭头按钮）改变触发，Value属性返回改变后的值。 Scroll：滑块移动触发， Value属性返回改变时的值。,11）定时器（Timer) 用途：按一定的时间间隔触发代码执行。可以实现动画和切换
19、等操作。 属性： Interval:时间间隔属性，单位0.001秒。 Enabled:活动属性，取值“True”或“False”。 事件： Timer: 有规律地触发该事件中的代码执行。只有一个事件,第三部分 菜单,1 菜单概述 菜单条：位于标题栏下，包括菜单的标题； 菜单：单击菜单标题，出现的命令列表； 菜单项：菜单命令； 子菜单：从一个菜单项分支出来的菜单； 弹出式菜单：右键快捷菜单。,2 菜单编辑器 在VB“工具”菜单中，提供了“菜单编辑器”。下面介绍“菜单编辑器”中各项的功能和意义。 标题：菜单标题，直接显示在菜单中；若需要菜单分隔线，则标题为“-” 名称：菜单标识，不可省略 快捷键：
20、为菜单项定义快捷键（顶层菜单不能设快捷键） 复选属性（Checked）：定义该菜单项为开关项 有效属性（Enable）：缺省为“True”，若为“False”则该菜单项变为灰色，不可执行 可见属性（Visible）:缺省为“True”，若为“False”则该菜单项不可见 其他：为菜单列表框的编辑按钮 编写代码，常用事件为Click,3 弹出式菜单 弹出式菜单的建立和下拉菜单一样，都是通过菜单编辑器来完成的，但弹出式菜单要将菜单的Visible属性设置为“False”，并需要通过增加程序代码来实现。 例：设置窗体的弹出式菜单。 程序代码： Private Sub Form_MouseUp(But
21、ton As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then Form1.PopupMenu menu3 End Sub,弹出菜单鼠标按键的识别 常数 值 描述 vbPopupMenuLeftButton 0 弹出菜单仅识别鼠 标左键 vbPopupMenuRightButton 2 弹出菜单识别鼠标 左键和右键,演示：菜单,1）添加窗体的三种方法： “工程”菜单中选“添加窗体”命令 从工具栏上选“添加窗体”按钮 从工程管理器窗口快捷菜单中“添加”对话框中选添加窗体”命令 2）删除窗体的二种方法： 在工程管理器窗口选中窗体， 在“工程”菜单中选“删除”命令 在工程管理器窗口选中窗体，从工程管理器窗口快捷菜单中选“删除”命令,第四部分 多重窗体,3）保存窗体 每一个添加的窗体都要单独保存，并命名。 4）设置启动窗体 系统默认第一个窗体为启动窗体（首先出现的窗体），必要时可自定义启动窗体。 “工程”菜单中选“属性”对话框，在“通用”标签的“启动对象”下拉窗口中选择启动窗体。 在工程管理器窗口选中工程，从工程管理器窗口快捷菜单中选“属性”命令，进入“工程属性”对话框。,
