(精品)常用控件.ppt
窗体与常用控件窗体与常用控件创建窗体创建窗体Visual BasicVisual Basic的常用控件的常用控件 工程的管理及环境的设置工程的管理及环境的设置12/25/202212/25/2022 7:17 PM丨复习创建窗体创建窗体窗体的属性、方法与事件窗体的属性、方法与事件定制窗体属性定制窗体属性窗体的显示、隐藏和卸载窗体的显示、隐藏和卸载PrintPrint方法方法12/25/202212/25/2022 7:17 PM丨复习窗体的属性、方法与事件属性名分类描述缺省值名称（Name）杂项窗体对象引用名Form1Caption外观窗体标题Form1BackColor外观返回或设置对象中文本和图形的背景色ForeColor外观返回或设置对象中文本和图形的前景色BorderStyle外观返回或设置对象的边框样式2Enabled行为决定对象是否活动True12/25/202212/25/2022 7:17 PM丨复习窗体的属性、方法与事件Visible行为决定对象是否可见TrueFont字体用于设置文本对象的字体、字型、字号等Moveable位置决定窗体能否被移动TrueLeft位置对象左边界距容器坐标系纵轴的距离Top位置对象上边界距容器坐标系横轴的距离Width位置对象的宽度Height位置对象的高度Picture外观返回或设置对象中的图形12/25/202212/25/2022 7:17 PM丨复习窗体边框风格设定值常 量风 格0vbBSNone窗口无外框；1vbFixedSingle单线外框，运行时窗口大小不可改变；2vbSizable(缺省值）双线外框，运行时可改变窗口大小；3vbFixedDouble双线外框，运行时窗口大小不可改变；4vbFixedToolWindow包含一个关闭按钮，标题栏字体缩小，窗口大小不可改变，在Windows95任务栏不会显示；5vbSizableToolWindow包含一个关闭按钮，标题栏字体缩小，窗口大小可以改变，在Windows95任务栏不会显示。12/25/202212/25/2022 7:17 PM丨复习常用窗体方法Hide：隐藏方法隐藏方法Move：移动方法移动方法Print：打印方法打印方法PrintForm：打印窗体方法打印窗体方法Refresh：刷新方法刷新方法Show：显示方法显示方法Cls：清除方法清除方法 12/25/202212/25/2022 7:17 PM丨复习常用窗体事件Click：单击事件；单击事件；DblClick：双击事件；双击事件；Load：装载事件；装载事件；Resize：在窗体被改变大小时，会触发本事件；在窗体被改变大小时，会触发本事件；Activate：激激活活事事件件，当当窗窗体体变变为为当当前前窗窗口口时时，引发本事件；引发本事件；Deactivate：失去激活事件失去激活事件 12/25/202212/25/2022 7:17 PM丨复习定制窗体属性在界面设计状态下通过属性窗口进行设定在界面设计状态下通过属性窗口进行设定在程序代码中进行设置在程序代码中进行设置Object.Property=表达式表达式12/25/202212/25/2022 7:17 PM丨复习窗体的显示、隐藏和卸载 1.显示与隐藏窗体显示与隐藏窗体 使用Show与Hide方法Object.Method p1,p2,2.装载窗体装载窗体与与Load事件事件 使用Load语句可把窗体载入内存 Load Object3.卸载窗体与卸载窗体与Unload事件事件4.End语句语句12/25/202212/25/2022 7:17 PM丨复习Show方法：窗体名窗体名.Show Style参数参数Style取值为：取值为：vbModel 有模式或有模式或 vbModeless 无模式（缺省）无模式（缺省）12/25/202212/25/2022 7:17 PM丨复习Print方法Print方法用于将文本输出到（屏幕）窗体上或输出到打印机上：Object.Print p1p2Object：窗体对象名或打印机对象名窗体对象名或打印机对象名 p1、p2、：输出项输出项 s：格式分隔符（格式分隔符（,或或;）12/25/202212/25/2022 7:17 PM丨复习Visual Basic的常用控件 概述文本框标签命令按钮计时器12/25/202212/25/2022 7:17 PM丨复习概述 VB通过工具箱提供的用于创建用户界面的各种可视化部件对象，称为“控件”VB提供的基本控件有：TextBox Label CommandButtonTimerOptionButton CheckBox Frame ListBox ComboBox HscrollBar VscrollBar PictureBox 12/25/202212/25/2022 7:17 PM丨复习Name（名称）属性该该属性是所有对象都具有的属性。所有的属性是所有对象都具有的属性。所有的控件在创建时由控件在创建时由VB自动提供一个默认名称。自动提供一个默认名称。程序中，对象名称是作为对象标识而引用，程序中，对象名称是作为对象标识而引用，不会显示在窗体上。不会显示在窗体上。12/25/202212/25/2022 7:17 PM丨复习Caption（标题）属性该该属性决定了控件标题拦上显示的内容属性决定了控件标题拦上显示的内容12/25/202212/25/2022 7:17 PM丨复习Height,Width,Top,Left属性Height和和Width属性决定了控件的高度属性决定了控件的高度和宽度，和宽度，Top和和Left属性决定了控件在窗属性决定了控件在窗体中的位置。体中的位置。TopWidthHeightLeft0,012/25/202212/25/2022 7:17 PM丨复习Enabled属性Enabled属性决定控件是否允许操作：属性决定控件是否允许操作：True：允许用户进行操作，并对操作作出允许用户进行操作，并对操作作出响应响应False：禁止用户进行操作，呈暗淡色。禁止用户进行操作，呈暗淡色。12/25/202212/25/2022 7:17 PM丨复习Visible属性Visible属性决定控件是否可见：属性决定控件是否可见：True：程序运行时控件可见程序运行时控件可见False：程序运行时控件隐藏，用户看不程序运行时控件隐藏，用户看不到，但控件本身存在到，但控件本身存在12/25/202212/25/2022 7:17 PM丨复习Font属性Font属性改变文本的外观，其分属性有：属性改变文本的外观，其分属性有：1.Name（字符型）控件上正文字体名字符型）控件上正文字体名2.Size（整型）控件上正文字体大小整型）控件上正文字体大小3.Bold（逻辑型）控件上正文是否是粗体逻辑型）控件上正文是否是粗体4.Italic（逻辑型）控件上正文是否是斜体逻辑型）控件上正文是否是斜体5.Strikethru（逻辑型）控件上正文是否加删除逻辑型）控件上正文是否加删除线线6.Underline（逻辑型）控件上正文是否带下划线逻辑型）控件上正文是否带下划线12/25/202212/25/2022 7:17 PM丨复习ForeColor（前景颜色）属性该该属性用来设置控件的前景颜色（即正文属性用来设置控件的前景颜色（即正文颜色）。其值是一个颜色）。其值是一个16进制常数，用户也进制常数，用户也可以直接在调色板中选取所需颜色。可以直接在调色板中选取所需颜色。12/25/202212/25/2022 7:17 PM丨复习BackColor（背景颜色）属性正文以外的显示区域颜色正文以外的显示区域颜色。12/25/202212/25/2022 7:17 PM丨复习BackStyle（背景风格）属性0Transparent：透明显示，即控件背景颜色显示不出来，若控件后面有其它控件均可透明显示出来。1Opaque：不透明，此时可为控件设置背景颜色。12/25/202212/25/2022 7:17 PM丨复习BorderStyle（边框风格）属性0None：控件周围没有边框。控件周围没有边框。1Fixed Single：控件带有单边框。控件带有单边框。12/25/202212/25/2022 7:17 PM丨复习Alignment属性Alignment属性决定控件内的对齐方式。属性决定控件内的对齐方式。0Left Justify：正文左对齐正文左对齐1Right Justify：正文右对齐正文右对齐2Center：正文居中正文居中12/25/202212/25/2022 7:17 PM丨复习AutoSize属性AutoSize属性决定控件是否自动调整大小。属性决定控件是否自动调整大小。True：自动调整大小。自动调整大小。False：保持原设计时的大小，正文若太保持原设计时的大小，正文若太长自动裁剪掉。长自动裁剪掉。12/25/202212/25/2022 7:17 PM丨复习TabIndex属性TabIndex属性决定了按Tab键时，焦点在各个控件移动的顺序。焦点是接受用户鼠标或键盘输入的能力。当对象具有焦点时，可接受用户的输入。12/25/202212/25/2022 7:17 PM丨复习常用控件文本框文本框标签标签命令按钮命令按钮计时器计时器12/25/202212/25/2022 7:17 PM丨复习1 文本框（文本框（TextBox）文本框是一个文本编辑区域，用户可以在该区域输入，编辑，修改和显示正文内容。文本框重要属性Text:文本框内输入内容文本框内输入内容MaxLength:文本框内可容纳的最大字符数文本框内可容纳的最大字符数MultiLine:为为True时可容纳多行文本时可容纳多行文本(注意注意换行换行)ScrollBars:0无滚动条无滚动条;1水平滚动条水平滚动条;2垂直滚动条垂直滚动条;3有垂直水平滚动条有垂直水平滚动条PasswordChar:输入口令时显示字符输入口令时显示字符 12/25/202212/25/2022 7:17 PM丨复习1 文本框（文本框（TextBox）文本框重要事件Change:当文本框内容改变时当文本框内容改变时KeyPress:当键入字符时当键入字符时LostFocus:当文本框失去焦点时当文本框失去焦点时 GotFocus:当文本框获得焦点时当文本框获得焦点时12/25/202212/25/2022 7:17 PM丨复习1 文本框（文本框（TextBox）文本框重要方法SetFocus:使使文本框获得焦点文本框获得焦点(光标位光标位于本文本框内于本文本框内)Refresh:使文本框的显示内容更新使文本框的显示内容更新12/25/202212/25/2022 7:17 PM丨复习2 标签（标签（Label）标签主要用来显示（输出）文本信息的，标签主要用来显示（输出）文本信息的，但是不能作为输入信息的界面。但是不能作为输入信息的界面。标签常用属性有：标签常用属性有：Caption：标签显示内容标签显示内容 Alignment：对齐属性对齐属性0-左对齐左对齐1-由对齐由对齐2-居中居中 AutoSize：为：为True时标签长度可根据字时标签长度可根据字符多少调整符多少调整 BackStyle：1不透明（缺省）不透明（缺省）0透透明明 12/25/202212/25/2022 7:17 PM丨复习2 标签（标签（Label）事件：事件：标签可响应单击等事件，但几乎不标签可响应单击等事件，但几乎不被使用被使用方法有方法有 Refresh Move：移动标签到指定位置移动标签到指定位置12/25/202212/25/2022 7:17 PM丨复习3 命令按钮命令按钮命令按钮用于控制程序执行某个功能，可：（1）用鼠标单击。（2）用Tab键将焦点移到相应按钮上，再按回 车键。命令按钮的重要属性Caption：按钮上显示文本按钮上显示文本 Default：为：为True时可按回车代替鼠标单时可按回车代替鼠标单击击Cancel：为：为True时可按时可按ESC键键代替鼠代替鼠标单击标单击 Style：0标准格式标准格式1图形格图形格 Picture：当当 Style为为1时可时可设置按钮表面设置按钮表面显示图形显示图形12/25/202212/25/2022 7:17 PM丨复习3 命令按钮命令按钮方法 SetFocus命令按钮接收Click事件12/25/202212/25/2022 7:17 PM丨复习文本框文本框1文本框文本框2标签标签1标签标签2按钮按钮1按钮按钮2应用示例应用示例12/25/202212/25/2022 7:17 PM丨复习9 计时器控件计时器控件计时器控件的属性很少，最重要的是：Interval：时间间隔属性，单位为千分之一秒；Enabled：活动属性，取值为True或False。计时器控件没有方法，可以响应的事件仅有Timer 12/25/202212/25/2022 7:17 PM丨复习工程的管理及环境的设置工程的管理及环境的设置工程的组成 环境设置 12/25/202212/25/2022 7:17 PM丨复习工程的组成工程的组成工程文件（.vbp）窗体文件（.frm）窗体的二进制数据文件（.frx）标准模块文件（.bas）类模块的文件（.cls）资源文件（.res）ActiveX控件的文件（.ocx）12/25/202212/25/2022 7:17 PM丨复习添加、删除和保存文件添加、删除和保存文件12/25/202212/25/2022 7:17 PM丨复习环境设置环境设置12/25/202212/25/2022 7:17 PM丨复习常用方法常用方法Print 方法例Cls方法Move方法 12/25/202212/25/2022 7:17 PM丨复习Print 方法方法Print方法的作用是在对象上输出信息。形式如下：方法的作用是在对象上输出信息。形式如下：对象对象.PrintSpc(n)|Tab(n)表达式列表表达式列表；|，对象：可以是对象：可以是Form、PictureBox或或Printer,缺省值为缺省值为Form。Spc(n)函数：用于在输出时插入函数：用于在输出时插入n个个空格。空格。Tab(n)函数：用于在输出表达式列表前向右移函数：用于在输出表达式列表前向右移动动n列。列。表达式列表：要输出的数值或字符串表达式。表达式列表：要输出的数值或字符串表达式。；(分号分号)：表示光标定位上一个显示的字符后。：表示光标定位上一个显示的字符后。，(逗号逗号)：表示光标定位在下一个打印区的开：表示光标定位在下一个打印区的开始位置，打印区每隔始位置，打印区每隔14列开始。列开始。返回返回12/25/202212/25/2022 7:17 PM丨复习例 用Print方法输出Private Sub Form_Click()Dim i As Integer,j As Integer Dim star As String star=“FontSize=6 For i=1 To 6 Form1.Print Tab(14-i*2)；For j=1 To i*2-1 Print star；Next j Print Next i12/25/202212/25/2022 7:17 PM丨复习Cls方法方法Cls方法用于清除运行时在窗体或图形框中显示的文本或图形。形式如下：对象.Cls其中：对象为窗体或图形框，缺省值为窗体。例如：form1.Cls 清除窗体上显示的图形或文本Cls清除窗体上显示的文本返回返回12/25/202212/25/2022 7:17 PM丨复习Move方法方法Move方法用于移动窗体或控件，：对象.Move 左边距离,上边距离,宽度,高度对象：可以是窗体及除时钟、菜单外的所有控件，缺省值为窗体。左边距离、上边距离、宽度、高度：数值表达式，以twip为单位。返回返回12/25/202212/25/2022 7:17 PM丨复习例移动控件示例Private Sub Form_click()showMove 600,700 End Sub12/25/202212/25/2022 7:17 PM丨复习
