vb中窗体和常用内部控件介绍

6
第 六 章 窗 体 和 常 用 内 部 控 件
2.键盘事件 (1)KeyDown(键按下)事件 (2)KeyUp(键弹起)事件 (3)KeyPress(按键)事件：当按下键盘上的 某个健时，将触发KeyPress事件。其事件 过程的格式为： Private Sub 对象_KeyPress(KeyAscii As Integer) …… End Sub 参数KeyAscii返回所按键的ASCII码 7

6.1.4窗体的事件
第 与窗体有关的常用事件有以下几种。 六 章 窗 体 和 常 用 内 部 控 件
1.鼠标事件 (1)Click(单击)事件 －－包含3个事件 (2)DblClick(双击)事件－－包含6个事件 (3)MouseMove(鼠标移动)事件 (4)MouseDown(鼠标按下)事件 (5)MouseUp(鼠标释放) )事件
21
第 六 章 窗 体 和 常 用 内 部 控 件
【例6.12】两个命令按钮,按钮一初始状态为可用, 按钮二初始状态为不可用,点击按钮一,按钮二变 为可用,按钮一变为不可用;点击按钮二,按钮一变 为可用,按钮二变为不可用 Private Sub Command1_Click() Command1.Enabled = False Command2.Enabled = True End Sub Private Sub Command2_Click() Command2.Enabled = False Command1.Enabled = True End Sub
3
第 六 章 窗 体 和 常 用 内 部 控 件
ControlBox、Maxbutton、Minbutton属性: 用于控制是否有控制菜单、最大化、最小化按钮。 Enabled属性：用于确定窗体是否能够对用户产生的 事件做出反应。 Height和Width属性：确定窗体的初始高度和宽度， 单位是缇。 Left和Top属性：确定窗体的左上角在屏幕上的横、 纵坐标。单位是缇。 Picture属性：用于在窗体上设置要显示的图形。 ［对象.］Picture=LoadPicture("文件名") Visible(可见性)：设置对象的可见性，默认值为 True WindowState属性：用于返回或设置窗体运行时的状 4 态
12
第 六 章 窗 体 和 常 用 内 部 控 件
6.2.1 控件的通用属性 1. Name属性 (1) 运行时是只读的 (2) 缺省名称 (3) 以字母开始，最长40个字符，可包括字母、数字 和下划线，不能包括标点符号或空格(允许汉字) (4) 所有控件都有此属性 2. Caption属性 (1) 标题文本属性 (2) Label控件标题大小没有限制。其他有标题的控 件，标题大小限制为255个字符。 (3) 注意与Name属性、Text属性的区别
第6章 窗体和常用内部控件
Visual BASIC
程 序 设 计
6.1 窗体 6.2 标准控件（通用属性、方法和事件） 6.3标准控件的使用 命令按钮、显示和输入文本的控件、 提供选择的控件、图像框和图片框控件 6.4 其他控件 计时和OLE控件
1
6.1 窗体
第 六 章 窗 体 和 常 用 内 部 控 件
14
第 六 章 窗 体 和 常 用 内 部 控 件
5. Font属性 格式: <控件名>.Font.<属性名> <属性名>: Name、Size、Bold、Italic、 Underline、Strikethrough 例: Form1.Font.Size = 14 Command1.FontItalic = True 6. Enabled属性 决定控件是否能够对用户产生的事件作出响应 7. Visible属性 注意: 如果在属性窗口中将控件的Visible属性设 置为False，则控件在设计窗体上仍是可见的，仅 在运行时才不可见。
5
【例6.2】编写程序在窗口标题栏中显示当前的坐 标位置
第 六 章 窗 体 和 常 用 内 部 控 件
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Form1.Caption = "鼠标事件演示 水平坐标=" & X & " 垂直坐标=" & Y End Sub
第 六 章 窗 体 和 常 用 内 部 控 件
2. Refresh方法 用于窗体和控件的刷新 下列情况使用Refresh方法 (1)在另一个窗体被加载时显示一个窗体的全 部 (2) 更新诸如FilelistBox控件之类的文件列表 框的内容. (3) 更新Data控件的数据结构. 3. Setfocus方法
窗体(Form)是设计VB应用程序的基本平台 窗体本身是一个对象，又是其他对象的载 体或容器 多数应用程序是从窗体开始执行的 ; 一个 程序可以有多个窗体 窗体分为单文档窗体(SDI)和多文档窗体(MDI) 6.1.1 窗体的结构 6.1.2 添加和移出窗体
2
第 六 章 窗 体 和 常 用 内 部 控 件
语法：Move Left,top,Width,Height 【例6.10】当按钮Cmd1获得焦点时，按键盘 上任意字符键后使文本框保持原位置不变且 扩大1.5倍. Private Sub cmd1_KeyPress(KeyAscii As Integer) Text1.Move 4440, 720, Text1.Width * 1.5, Text1.Height * 1.5 End Sub 18
22
第 六 Private Sub Command1_Click() 章 If Command1.Caption = "最大化（&L）" Then Me.WindowState = 2 窗 体 Command1.Caption = "还原（&B）" 和 常 Else 用 Me.WindowState = 0 内 Command1.Caption = "最大化（&L）" 部 控 End If 件 End Sub
列表框(ListBox)
垂直滚动条(VScrollBar)
驱动器列表框(DriveListBox 文件列表框(FileListBox)
直线(Line) 数据控件(Dat*.ocx文件独立存在，是 对标准控件的扩充，不会自动显示在工具箱 第 六 中．需用利用菜单对应的文件加载到工程中． 章 “工程” →“部件” 窗 体 和 常 用 内 部 控 件
6.2 标准控件
第 六 章 图片框(pictureBox) 标签(Label) 框体(Frame) 文本框(TextBox)
单选按钮(OptionButton)
命令按钮(CommandButton
窗 复选框(CheckBox) 体 组合框(ComboBox) 和 水平滚动条(HScrollBar) 常 用 定时器(Timer) 内 部 目录列表框(DirListBox) 控 形状(Shape) 件 图像(Image) OLE对象(OLE)
16
4. KeyPress事件 第 5. KeyDown和KeyUp事件 六 6. MouseMove事件 章 7. MouseDown事件和MouseUp事件
窗 体 和 常 用 内 部 控 件
17
6.2.3 控件的通用方法
第 1. Move方法 六 功能：用于移动控件，或改变控件大小 章 窗 体 和 常 用 内 部 控 件
13
第 六 章 窗 体 和 常 用 内 部 控 件
3. Height、Width、Left、 Top属性 用于设置对象的高度、宽度和控件距离容器 的左边距和顶边距。 4. BackColor、ForeColor属性 设置控件的背景色和前景色 如设置窗体form1的背景色为红色： (1)form1.backcolor=vbred (2)form1.backcolor=RGB(255,0,0) (3)form1.backcolor=&HFF
19
6.3 标准控件的使用
第 六 章 窗 体 和 常 用 内 部 控 件
6.3.1 命令按钮控件 属性: Default:属性为true时,则该按钮为默认按钮,回车 相当于单击该按钮.在一个窗体中,只允许一个 命令按钮的Default属性设置为true. Cancel:属性为true时,则该按钮为默认的取消按 钮,按ESC相当于单击该按钮.在一个窗体中,只 允许一个命令按钮的Cancel属性设置为true.
6.1.3 窗体的基本属性 设置窗体的属性，可在程序设计时在属性窗口中 手工设置，也可以在程序运行时由代码实现 一些常用的窗体属性： Name属性：用于设置窗体的名称，通过该名称引 用窗体对象及其属性、事件和方法。 Caption属性：用于设置窗体标题栏上的标题内 容。 Appearance属性：用于设置窗体的外观是平面还 是三维的 BackColor和ForeColor属性：设置窗体的背景色 和前景色 BorderStyle属性:返回或设置对象的边框样式
第 六 章 窗 体 和 常 用 内 部 控 件
【例6.3】 编写程序利用键盘 “[”和“]”实现窗口 的变小和变大 Private Sub Form_KeyPress(KeyAscii As Integer) Select Case KeyAscii Case Asc("[") Me.Width = Me.Width * 0.9 Me.Height = Me.Height * 0.9 Case Asc("]") Me.Width = Me.Width * 1.1 Me.Height = Me.Height * 1.1 End Select End Sub
20
第 Style:用来设置命令按钮的显示类型．０－ 六 Standard:１－Graphical 章 窗 体 和 常 用 内 部 控 件
Picture:设置命令按钮中要显示的图形，但只有 在Style属性设置为１时图形才能显示． DownPicture:返回/设置按钮按下时显示的图形, 通过文件加载此图形
8
第 六 章 窗 体 和 常 用 内 部 控 件
3.其他事件 (1)Load(装载)事件 【例6.4】设计程序,使窗体一打开就在屏幕的右上 角 Private Sub Form_Load() Form1.Top = 0 Form1.Left = Screen.Width - Form1.Width End Sub (2)Unload(卸载)事件 (3)Activate(活动)、Deactivate(非活动)事件 (4)Paint事件
当移动窗体、改变窗体大小，最大化，最小化，窗体 被其他窗体遮住后再次显示，等等时都会发生
9
6.1.5
第 六 章 窗 体 和 常 用 内 部 控 件
窗体的方法
(1)Show方法：用于快速显示一个窗体，使该窗 体变成活动窗体 (2)Hide方法:用于隐藏form对象,将其Visible属 性设置为False. (3)Print方法：用于在窗体上输出表达式的值 (4)Cls方法：用于清除运行时在窗体中显示的文 本或图形.Picture属性和控件不受影响.激活前把 AutoDraw属性设置为true. (5)Move(移动)方法：用于移动并改变窗体或控 件的位置和大小 Form1.move <left>[,top,width,height] Form1.Move Form1.Left + 500, Form1.Top + 500, Form1.Width * 2 10
15
6.2.2 控件的通用事件
第 1.Click事件和DblClick事件 六 2.Change事件 章 3.GotFocus和LostFocus事件 窗 【例6.9】焦点事件实例。当文本获得焦点时，文 体 本背景为白色，处于激活状态，当失去焦点时，背 和 常 景为浅灰色。 用 Private Sub Text1_GotFocus() Text1.BackColor = &HFFFFFF 内 部 End Sub 控 件 Private Sub Text1_LostFocus() Text1.BackColor = &HC0C0C0 End Sub