VB常用控件与界面设计教程

1、徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3.1 3.1 创建窗体创建窗体3.2 3.2 Visual BasicVisual Basic的常用控件的常用控件 3.3 3.3 制作菜单制作菜单 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3.1.1 3.1.1 窗体的属性、方法与事件窗体的属性、方法与事件3.1.2 3.1.2 定制窗体属性定制窗体属性3.1.3 3.1.3 窗体的显示、隐藏和卸载窗体的显示、隐藏和卸载3.1.4 3.1.4 PrintPrint方法方法徐州医学院徐州医学院VBVB教程教程公共

2、教育学院公共教育学院 计算机教研室计算机教研室3.1.1 窗体的属性、方法与事件属性名属性名分类分类描述描述缺省值缺省值名称名称（NameName）杂项杂项窗体对象引用名窗体对象引用名Form1Form1CaptionCaption外观外观窗体标题窗体标题Form1Form1BackColorBackColor外观外观返回或设置对象中文本和返回或设置对象中文本和图形的背景色图形的背景色ForeColorForeColor外观外观返回或设置对象中文本和返回或设置对象中文本和图形的前景色图形的前景色BorderStyBorderStylele外观外观返回或设置对象的边框样返回或设置对象的边框样式式

3、2 2EnabledEnabled行为行为决定对象是否活动决定对象是否活动TrueTrue徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3.1.1 窗体的属性、方法与事件VisibleVisible行为行为决定对象是否可见决定对象是否可见TrueTrueFontFont字体字体用于设置文本对象的字体、用于设置文本对象的字体、字型、字号等字型、字号等MoveableMoveable位置位置决定窗体能否被移动决定窗体能否被移动TrueTrueLeftLeft位置位置对象左边界距容器坐标系对象左边界距容器坐标系纵轴的距离纵轴的距离TopTop位置位置对象上边界

4、距容器坐标系对象上边界距容器坐标系横轴的距离横轴的距离WidthWidth位置位置对象的宽度对象的宽度HeightHeight位置位置对象的高度对象的高度PicturePicture外观外观返回或设置对象中的图形返回或设置对象中的图形徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室窗体边框风格设定值设定值常常 量量风风 格格0 0vbBSNonevbBSNone窗口无外框窗口无外框；1 1vbFixedSinglevbFixedSingle单线外框，运行时窗口大小不可改变；单线外框，运行时窗口大小不可改变；2 2vbSizablevbSizable( (缺

5、省值）双线外框，运行时可改变窗口大缺省值）双线外框，运行时可改变窗口大小；小；3 3vbFixedDoublevbFixedDouble双线外框，运行时窗口大小不可改变；双线外框，运行时窗口大小不可改变；4 4vbFixedToolWinvbFixedToolWindowdow包含一个关闭按钮，标题栏字体缩小，窗口大小包含一个关闭按钮，标题栏字体缩小，窗口大小不可改变，在不可改变，在Windows95Windows95任务栏不会显示；任务栏不会显示；5 5vbSizableToolWivbSizableToolWindowndow包含一个关闭按钮，标题栏字体缩小，窗口大小包含一个关闭按钮，标题

6、栏字体缩小，窗口大小可以改变，在可以改变，在Windows95Windows95任务栏不会显示任务栏不会显示。返回徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室常用窗体方法Hide：隐藏方法：隐藏方法Show：显示方法；：显示方法；Move：移动方法：移动方法Print：打印方法；：打印方法；Cls：清除方法：清除方法 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室常用窗体事件Click：单击事件；：单击事件；DblClick：双击事件；：双击事件；Load：装载事件：装载事件.当使用当使用 Load 语句启动应用

7、程序，语句启动应用程序，或引用未装载的窗体属性或控件时，此事件发生。或引用未装载的窗体属性或控件时，此事件发生。 Resize：在窗体被改变大小时，会触发本事件；：在窗体被改变大小时，会触发本事件；Activate：激活事件，当窗体变为当前窗口时，引发：激活事件，当窗体变为当前窗口时，引发本事件；本事件；Deactivate：失去激活事件：失去激活事件 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3.1.2 定制/设置窗体属性1、在设计状态下通过属性窗口进行设定、在设计状态下通过属性窗口进行设定2、在程序代码中进行设置、在程序代码中进行设置Object

8、.Property = Expression例如：例如：Form1.caption=“考试系统考试系统”特别注意：某些属性只能在代码中进行设置或改变特别注意：某些属性只能在代码中进行设置或改变徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3.1.3 窗体的显示、隐藏和卸载 1. 显示与隐藏窗体显示与隐藏窗体 使用使用Show与与Hide方法方法Object.Method p1,p2,2. 装载窗体与装载窗体与Load事件事件 使用Load语句可把窗体载入内存 Load Object3. 卸载窗体与卸载窗体与Unload事件事件4. End语句语句徐州医学

9、院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室Show方法方法：窗体名窗体名. Show Style参数参数Style取值为：取值为：1 或者或者vbModel 有模式，例如有模式，例如windows 窗口窗口 0 或者或者vbModeless 无模式（缺省）无模式（缺省）,例如例如VB环环境境 当当 Show 在显示无模式窗体时，随后遇到的代在显示无模式窗体时，随后遇到的代码则要执行。当码则要执行。当 Show 在显示模式窗体在显示模式窗体 (modal form) 时，则随后的代码直到该窗体被隐藏或时，则随后的代码直到该窗体被隐藏或卸载时才能执行。卸载时才能

10、执行。 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3.1.4数据输出Print方法 PrintPrint方法方法 Print方法可以在窗体上显示文本字符串方法可以在窗体上显示文本字符串和表达式的值，并可在其他图形对象或打印和表达式的值，并可在其他图形对象或打印机上输出信息。机上输出信息。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室其一般格式为：其一般格式为： 对象名称对象名称.Print.Print表达式表表达式表,|;,|; 1 1、“对象名称对象名称”可以是可以是窗体（窗体（FormForm）、图片框图片

11、框（PictureBoxPictureBox）或打印机（）或打印机（PrinterPrinter），也可以是），也可以是立即窗口（立即窗口（DebugDebug） 2 2、“表达式表表达式表”是一个或多个表达式，可以是数值是一个或多个表达式，可以是数值表达式或字符串表达式或字符串 3 3、如果输出的各表达式之间用、如果输出的各表达式之间用逗号逗号分隔，则按分隔，则按标准标准输出格式显示数据项输出格式显示数据项；如果各输出项之间用；如果各输出项之间用分号或分号或空格作分隔符，则按紧凑输出格式输出数据。空格作分隔符，则按紧凑输出格式输出数据。例如例如 以14个字符位置为单位把一个输出行分为若干个区

12、段，逗号后面的表达式在下一个区段输出 不同段的文字中间相隔一个空格，但是如果是字符串的情况下，就不会有空格如果是字符串前后就不会有空格 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室4、print方法具有计算和输出双重功能，对于表达式，先方法具有计算和输出双重功能，对于表达式，先计算后输出。计算后输出。Print没有赋值功能没有赋值功能。例如：例如：a=3,b=4 Print (a+b)*3问题：问题： Print c= (a+b)*3 输出的结果是什么？输出的结果是什么？5、每执行以、每执行以print方法都要自动换行，为了仍能在同一行方法都要自动换行

13、，为了仍能在同一行显示，可以在末尾加上一个分号或逗号。显示，可以在末尾加上一个分号或逗号。6、有一些、有一些函数函数可以和可以和print一起控制输出的格式一起控制输出的格式徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室Print输出格式说明例如： Dim a As integer, b As integer a = 100: b = 300Print a,bPrint a;b 输出结果为： 100 300 /100和300之前相隔14个字符位置 100 300 /在VB中输出数值数据时数值的前面有一个符号 位，后面有一个空格。对于分号情况，如果是字符串

14、，前后就不会有空格，例如：Print “你好”；”小熊”Print”你好小熊”结果：你好小熊你好小熊徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室TabTab函数函数 SpcSpc函数函数 空格函数（空格函数（Space$Space$）与Print方法有关的函数 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室Tab函数格式：格式：Tab (n)Tab函数把光标移到由参数函数把光标移到由参数n指定的列指定的列(从从1开始计数，如开始计数，如果果n1）徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机

15、教研室计算机教研室4、 ListCount属性属性 列表框中的条目数列表框中的条目数 ListCount（只读属性）（只读属性）在设计时不可用在设计时不可用，只能在程序中，只能在程序中使用。列表框中的表项的排列使用。列表框中的表项的排列从从0开始，最后一项的序号为开始，最后一项的序号为ListCount-1，例如：例如： x=List1.ListCount 则则X的值为列表框的值为列表框List1中的总项数中的总项数徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室5、List属性属性设置列表框中包含的项设置列表框中包含的项 用来列出表项的内容，用来列出表项

16、的内容， List 属性实质上是个一属性实质上是个一维字符串数组，其下界为维字符串数组，其下界为0，上界为，上界为 ListCount-1 。每一元素存放列表框中的一个条目。每一元素存放列表框中的一个条目。List 属性和属性和 ListCount、ListIndex 属性结合起来属性结合起来使用使用。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室其格式是：其格式是：.List()=例如：例如：Listl.List(0)“汉族汉族” 把把Listl的第一行的文本定义为的第一行的文本定义为“汉族汉族”。 可以通过下标访问数组中的值（从可以通过下标访问数组中

17、的值（从0开始），格开始），格式为：式为： S$=列表框列表框.List（下标）（下标） 例如：例如： S$=List1.list(5)将列出列表框将列出列表框List1中第六项的内容中第六项的内容徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室6、ListIndex属性属性v 表示当前所选条目的序号（表示当前所选条目的序号（0 ListCount-1）；）；v 若列表框支持多选，则若列表框支持多选，则ListIndex属性的值是最后一个属性的值是最后一个被选中条目的序号；被选中条目的序号；v 若没有条目被选中，则此属性的值为若没有条目被选中，则此属性的值

18、为-1。只能在程序。只能在程序中使用。中使用。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室7、MultiSelect属性属性设置是否能够选择多项设置是否能够选择多项 MultiSelect = 0：不允许复选（缺省值）不允许复选（缺省值） 。 MultiSelect = 1：简单复选。鼠标单击或按下空格键，在简单复选。鼠标单击或按下空格键，在列表中选中或取消选中项列表中选中或取消选中项,使用箭头键移动焦点。使用箭头键移动焦点。MultiSelect = 2：扩展复选。扩展复选。按下按下 SHIFT 并单击鼠标并单击鼠标或或按箭头键按箭头键选择连续的多项

19、选择连续的多项。按下按下 CTRL 并单击鼠标并单击鼠标选择不选择不连续的多项（或取消选中项）。连续的多项（或取消选中项）。 MultiSelect 属性在运行时是只读的，也就是说不能利属性在运行时是只读的，也就是说不能利用程序代码改变它的值。用程序代码改变它的值。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室Style 属性属性控制列表框的外观控制列表框的外观Style=0：默认值，标准样式，单击选项即可选中。：默认值，标准样式，单击选项即可选中。Style=1：复选框样式，列表框的每个项目以复选框：复选框样式，列表框的每个项目以复选框的形式的形式显示

20、（不受显示（不受MultiSelect属性的影响）。属性的影响）。Style属性属性在运行时是只读的。在运行时是只读的。 Style=0Style=1徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室10、Selected属性属性Selected属性是一个逻辑型数组属性是一个逻辑型数组（与（与List 和和ItemData属性类似）属性类似），其中的每个元素对应列表框中的一个选项的选择状态：其中的每个元素对应列表框中的一个选项的选择状态：List1.Selected(i)=True时，对应项被选中；时，对应项被选中；List1.Selected(i)=Fal

21、se时，对应项没有选中。时，对应项没有选中。Selected属性的语法为：属性的语法为：列表框名列表框名.Selected()=此属性不能在属性窗口中使用此属性不能在属性窗口中使用例如：例如：List1.Selected(1)=true徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室11、Text属性属性列表框中最后一次所选条目对应的文字，列表框中最后一次所选条目对应的文字，Text属性为只读属性属性为只读属性。12、Sorted属性属性指示列表框中的条目是否排序。指示列表框中的条目是否排序。Sorted属性值为属性值为True，则选项按字母顺序升序，则选

22、项按字母顺序升序排列，否则按输入的顺序排列。排列，否则按输入的顺序排列。Sorted属性为只读属性属性为只读属性徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室 1、AddItem向列表框中添加新条目向列表框中添加新条目格式：格式： 列表框名列表框名.AddItem 字符串表达式字符串表达式 ,插入位置序号插入位置序号 若不指定插入位置，且若不指定插入位置，且Sorted = False，则插入到列表尾；，则插入到列表尾；否则插入到适当位置。否则插入到适当位置。 例如：例如：List1.AddItem “王平王平” ，0列表框方法列表框方法徐州医学院徐州医

23、学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室2、RemoveItem方法方法删除指定列表项删除指定列表项 格式：格式：列表框名列表框名.RemoveItem 删除项序号删除项序号 该方法一次只能删除一个项目。该方法一次只能删除一个项目。 例如：例如：List1. RemoveItem 0 3、Clear方法方法删除列表框中的所有项。删除列表框中的所有项。 格式：格式：列表框对象名列表框对象名.Clear4、Move方法方法徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室列表框事件列表框接收列表框接收Click事件、事件、 Dbcl

24、ick事件事件通常把列表框和命令按钮组合使用通常把列表框和命令按钮组合使用例例: 交换两个列表框中的项目交换两个列表框中的项目徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室5、组合框（ComboBox） 组合框由一个列表框和一个文本框组成，用户既可以组合框由一个列表框和一个文本框组成，用户既可以像在文本框一样在组合框中直接输入文本来选定项目，像在文本框一样在组合框中直接输入文本来选定项目，也可从列表中选定项目。也可从列表中选定项目。 组合框具备列表框的属性。组合框具备列表框的属性。组合框的属性组合框的属性：Text、List、ListIndex、List

25、Count和和Selected属性属性方法方法：AddItem、RemoveItem、Clear事件事件：Click、DbClick。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室组合框另外具有与列表框不同的属性组合框另外具有与列表框不同的属性StyleStyle组合框样式由组合框样式由Style属性来控制，如表所示：属性来控制，如表所示：组合框组合框Style属性设置属性设置设置值设置值VB常数常数说明说明0vbComboDropDown（缺省值）下拉式组合框。包括一个下拉式列（缺省值）下拉式组合框。包括一个下拉式列表和一个文本框，表和一个文本框，（可

26、输入文本可下拉）（可输入文本可下拉）1vbComboSimple简单组合框。包括一个文本框和一个不能下拉简单组合框。包括一个文本框和一个不能下拉的列表的列表（可输入文本不能下拉）（可输入文本不能下拉）2vbComboDropDownList下拉式列表框。仅允许从下拉式列表中选择下拉式列表框。仅允许从下拉式列表中选择（不能输入文本可下拉）（不能输入文本可下拉）徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室6、 图形控件 VB 6.0包含包含4个图形控件：个图形控件：pictureBox控件控件Image控件控件Shape控件控件Line控件控件 徐州医学院

27、徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室图片框、图像框的属性、事件和方法 PictureBox称为称为图片框图片框Image控件称为控件称为图像框图像框 图片框和图像框可以显示的图像文件格式有：图片框和图像框可以显示的图像文件格式有： 位图文件位图文件(BMP)、图标文件、图标文件(ICO)、JPEG格式文件、格式文件、GIF格式文件。格式文件。 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室与窗体属性相同的属性1、Name 属性属性对象名对象名2、Left , Top , Width , Height , Visib

28、le, Enabled属性属性 3、BorderStyle 属性属性边框样式边框样式 0：无边框：无边框 1：有边框（默认）：有边框（默认）4、FontBold等字体属性等字体属性徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室5、Picture 属性属性 Picture 属性用于窗体、图片框和图象框，它可以通过属属性用于窗体、图片框和图象框，它可以通过属性窗口设置，用来把图形放入这些对象中。性窗口设置，用来把图形放入这些对象中。6、 Stretch属性只用于图象框属性只用于图象框来指定一个图形是否要调整大来指定一个图形是否要调整大小，以适应图像框控件的大

29、小（小，以适应图像框控件的大小（True：缩放图像；：缩放图像；False（默认值）：图像以原始大小显示）。（默认值）：图像以原始大小显示）。其语法为：其语法为： .Stretch =徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室图形文件的装入1、图片框与图象框的区别、图片框与图象框的区别（1）图片框（）图片框（ PictureBox ）是容器控件，而图象框）是容器控件，而图象框（ Image ）不是。）不是。（2）图片框可以通过）图片框可以通过Print方法接收文本，而图象框不能。方法接收文本，而图象框不能。（3）图象框比图片框占用的内存少，显示速度快

30、。）图象框比图片框占用的内存少，显示速度快。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室2、在设计阶段装入图形文件、在设计阶段装入图形文件（1）用属性窗口中的）用属性窗口中的Picture属性装入属性装入（2）通过）通过“复制复制”、“粘贴粘贴”命令装入窗体、图片框或图形命令装入窗体、图片框或图形框。框。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3、在运行期间装入图形文件、在运行期间装入图形文件LoadPicture函数函数 LoadPicture函数用于在代码中将图形载入到窗体、函数用于在代码中将图形载入到

31、窗体、PictureBox 控件或控件或 Image 控件中。控件中。 其语法为：其语法为： LoadPicture()Picture1.PictureLoadPicture(D:usoscap.bmp)说明：说明：不带参数的不带参数的LoadPicture( )函数，是使图像控件函数，是使图像控件不显示任何图像，使该图片框变为空白不显示任何图像，使该图片框变为空白,用来删除图象用来删除图象.徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室 编程实现编程实现三个图片框中图片的轮换三个图片框中图片的轮换，并使得一个图片，并使得一个图片框中可以显示整个图片。框

32、中可以显示整个图片。（1 1）界面设计）界面设计 在窗体上添加如图所示三个图片框控件在窗体上添加如图所示三个图片框控件Picture1、Picture2、Picture3。将。将Picture3的的AutoSize属性属性设置为设置为True。其他属性值为默认值。其他属性值为默认值。 （a）设计时界面）设计时界面（b）运行时界面）运行时界面（c）响应事件）响应事件徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室（2）事件代码）事件代码PrivateSubForm_Load()Picture1.Picture=LoadPicture(c:steamship.

33、gif)Picture2.Picture=LoadPicture(c:bus.gif)Picture3.Picture=LoadPicture(c:car.gif)EndSubPrivateSubPicture3_Click()Form1.Picture=Picture3.PicturePicture3.Picture=Picture2.PicturePicture2.Picture=Picture1.PicturePicture1.Picture=Form1.PictureForm1.Picture=LoadPicture()EndSub徐州医学院徐州医学院VBVB教程教程公共教育学院公共教

34、育学院 计算机教研室计算机教研室直线和形状 Shape、Line控件为轻量图形控件，比控件为轻量图形控件，比PictureBox控件控件显示速度快。显示速度快。 Shape控件和控件和Line控件不支持任何事件。控件不支持任何事件。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室主要属性：主要属性：BorderColor BoderStyle （7种值）种值）BoderWidth （边界宽度）（边界宽度）BackStyleBackStyle （0 0为透明，为透明，1 1为不透明）为不透明）FillColorFillColor FillStyleFillS

35、tyle （8 8种值）种值）徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室Shape控件的Shape属性图4-8 Shape属性确定的形状表表4-4 Shape控件的预定义图形控件的预定义图形图形名称图形名称数值数值常量常量矩形矩形0vbShapeRectangle正方形正方形1vbShapeSquare椭圆形椭圆形2vbShapeOval圆形圆形3vbShapeCircle圆角矩形圆角矩形4vbShapeRoundedRectangle圆角正方形圆角正方形5vbShapeRoundedSquare徐州医学院徐州医学院VBVB教程教程公共教育学院公共教

36、育学院 计算机教研室计算机教研室7 7、选择控件、选择控件 复选框和单选按钮复选框和单选按钮复选框（复选框（CheckBox） 复选框通过复选框通过 Value 属性指示其所处的状态。属性指示其所处的状态。 无论何时，无论何时，当用户单击复选框时都将触发其当用户单击复选框时都将触发其Click 事件。事件。 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室单选框（单选框（OptionButton又称为选项按钮）又称为选项按钮） 也是提供选择项的控件，它是从多个可选项中选择一项也是提供选择项的控件，它是从多个可选项中选择一项的操作。的操作。 单选框单选框和和

37、复选框复选框看起来相似。因此，可以把复选框中的看起来相似。因此，可以把复选框中的操作方法用到单选框上来。操作方法用到单选框上来。 它们之间的区别是：它们之间的区别是：单选框一般用于单项选择，而复选单选框一般用于单项选择，而复选框则可以用于多项选择。框则可以用于多项选择。 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室单选框和复选框的重要属性、事件和方法单选框和复选框的重要属性、事件和方法1、Name 属性属性对象名对象名2、Left、Top、Width、Height、Visible、 Enabled 属性属性3、Caption属性属性标题文字标题文字4、

38、Style 属性属性选框的样式选框的样式 0：标准样式（默认）显示：标准样式（默认）显示 1：以命令按钮的样式显示：以命令按钮的样式显示复选框（左）和单选按钮（右）复选框（左）和单选按钮（右） 复选框和单选按钮（未选中状态）复选框和单选按钮（未选中状态） 复选框和单选按钮（选中状态）复选框和单选按钮（选中状态）徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室5、Alignment 属性属性 0：框在文字左边（默认）：框在文字左边（默认） 1：框在文字右边：框在文字右边6、 Value 属性属性复选框复选框： Value=0 表示未选中（默认）表示未选中（默

39、认） Value=1 表示选中表示选中 Value=2 复选框为灰色，表示禁止用户复选框为灰色，表示禁止用户 选择。选择。单选框单选框： Value = True 表示选中表示选中 Value = False 表示未选中（默认）表示未选中（默认）7、 Move方法方法8、Click事件事件 例题例题徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室8、 框架 在在VB6.0中，可以作为其他对象容器除窗体和图片控件中，可以作为其他对象容器除窗体和图片控件外，还有框架控件（外，还有框架控件（Frame）。）。 在容器中的控件，可以随载体同时移动，控件的位置在容器

40、中的控件，可以随载体同时移动，控件的位置也相对容器的位置而设置。也相对容器的位置而设置。 Frame控件不仅可以作为其他控件的载体，而且可用控件不仅可以作为其他控件的载体，而且可用它将其他控件分成可标识的控件组。它将其他控件分成可标识的控件组。例如，用例如，用Frame控件对控件对OptionButton控件分组等。控件分组等。 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室1. 属性属性（1）Caption属性属性 Caption属性设定框架上的标题名称。如果属性设定框架上的标题名称。如果Caption为空为空字符，则框架为封闭的矩形框，但区别于矩形控

41、件。字符，则框架为封闭的矩形框，但区别于矩形控件。（2）Enabled属性属性 当当Enabled为为False时，程序运行时该框架在窗体中的标时，程序运行时该框架在窗体中的标题正文为灰色，表示框架中的所有对象均被屏蔽，不允许题正文为灰色，表示框架中的所有对象均被屏蔽，不允许用户对其进行操作。用户对其进行操作。（3）Visible属性属性当当Visible为为False时，则程序运行时框架及其所有控件全部时，则程序运行时框架及其所有控件全部被隐蔽起来。被隐蔽起来。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室2. 事件事件 框架可以响应框架可以响应Cli

42、ck和和DbClick事件，但应用程序中事件，但应用程序中一般不需要编写框架的事件过程。一般不需要编写框架的事件过程。 例：用框架对单选按钮分组例：用框架对单选按钮分组徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室9、 滚动条 滚动条包括滚动条包括水平滚动条（水平滚动条（HScrollBar）和垂直滚动条）和垂直滚动条(VScrollBar)，可以作为图形辅助控件和输入设备。可以作为图形辅助控件和输入设备。 属性属性 1. Value属性属性 Value属性值为滚动块在滚动条中位置的数值。属性值为滚动块在滚动条中位置的数值。当滚动块处于当滚动块处于最左边

43、最左边或或最顶端最顶端时，时，Value取取最小值最小值。反之，。反之，则则Value值取值取最大值最大值。在中间的各个位置，在中间的各个位置，Value值与位置是严格按照比例来设值与位置是严格按照比例来设定的。定的。 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室改变滚动条Value属性的方法有4种：直接在属性窗口中设定直接在属性窗口中设定Value值；值；鼠标单击两端箭头键改变滚动条数值；鼠标单击两端箭头键改变滚动条数值；将滚动块沿滚动条拖动到任意位置；将滚动块沿滚动条拖动到任意位置；用鼠标单击滚动条中滚动块两侧的部分使滚动块以用鼠标单击滚动条中滚动

44、块两侧的部分使滚动块以翻页的速度移动。翻页的速度移动。 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室2. Max和和Min属性属性 Value属性的取值范围由属性的取值范围由Max和和Min属性设置：属性设置：Max代表代表Value的最大值，的最大值，Min代表代表Value的最小值。的最小值。Value属性的缺属性的缺省值为省值为0和和32767。 3. LargeChange和和SmallChange属性属性LargeChange：单击滚动块前面和后面时，：单击滚动块前面和后面时，Value增加或增加或减少的增量减少的增量 SmallChange

45、：单击滚动条两端的箭头时，：单击滚动条两端的箭头时，Value增加或减增加或减 少的增量少的增量徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室事件 1. Change事件事件在滚动块移动后发生，它是滚动条最重要的事件。在滚动块移动后发生，它是滚动条最重要的事件。2. Scroll事件事件鼠标鼠标拖动拖动滚动块时发生。单击滚动箭头或滚动条时滚动块时发生。单击滚动箭头或滚动条时不发生。不发生。 例题例题徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室10、 定时器 在程序设计中，对于由系统时钟控制的定时响应处理，在程序设

46、计中，对于由系统时钟控制的定时响应处理，例如每隔一段时间就进行某种操作，通常使用定时器例如每隔一段时间就进行某种操作，通常使用定时器控件（控件（Timer）。）。 加入定时器后，通过设置定时器间隔属性加入定时器后，通过设置定时器间隔属性Interval来确来确定事件发生的时间。定事件发生的时间。 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室1. 重要属性重要属性（1）Interval属性属性 Interval指定定时器事件发生的间隔指定定时器事件发生的间隔毫秒毫秒数，间隔的取值在数，间隔的取值在065535之间，最长的间隔大约为之间，最长的间隔大约为1

47、分钟分钟在程序运行期间，定时器并不可见在程序运行期间，定时器并不可见。当当Interval属性值为属性值为0时屏蔽定时器时屏蔽定时器（2）Enabled属性属性Enabled属性控制定时器是否生效。属性控制定时器是否生效。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室2 事件事件定时器控件只有一个定时器控件只有一个Timer事件。在一个事件。在一个Timer控件的控件的预定的时间间隔过去之后发生。预定的时间间隔过去之后发生。例题例题1：建立数字计时器：建立数字计时器 例例2：用计时器放大字体：用计时器放大字体例例3：抽奖程序：抽奖程序徐州医学院徐州医学院

48、VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室制作菜单 3.3.1 菜单概述3.3.2 使用菜单编辑器 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3.3.1 菜单概述 Windows程序界面中的菜单由以下元素组成程序界面中的菜单由以下元素组成 ：菜单条菜单条：每个菜单的标题，如：每个菜单的标题，如“文件文件”、“ 编辑编辑”和和“帮助帮助”等；等；菜单菜单：用鼠标单击菜单条上的菜单标题时，出现的命令列表。：用鼠标单击菜单条上的菜单标题时，出现的命令列表。菜单项菜单项：菜单中的每一个表项。：菜单中的每一个表项。子菜单子菜单：从一个菜

49、单项分支出来的菜单。：从一个菜单项分支出来的菜单。弹出式菜单弹出式菜单：单击鼠标右键时出现的与当前操作有关联的菜单。：单击鼠标右键时出现的与当前操作有关联的菜单。 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3.3.2 菜单编辑器 窗体上的菜单是通过菜单编辑器创建的。窗体上的菜单是通过菜单编辑器创建的。1 1、使用、使用“工具工具”菜单中的菜单中的“菜单编辑器菜单编辑器”命令；命令；2 2、单击、单击VB窗口工具栏上的窗口工具栏上的“菜单编辑器菜单编辑器”按钮按钮，屏幕，屏幕上出现上出现“菜单编辑器菜单编辑器”的对话框的对话框 徐州医学院徐州医学院VB

50、VB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室菜单编辑器 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室设置菜单属性设置菜单属性1.1. “标题标题”属性，用于菜单显示。输入属性，用于菜单显示。输入“-”-”，则在两个菜单命令，则在两个菜单命令项间加一分隔线项间加一分隔线2.2. “名称名称”属性属性( (不得确省不得确省) )，用于在代码中引用菜单命令项，用于在代码中引用菜单命令项3.3. “索引索引”属性，用于确定菜单对象在控件数组中的位置属性，用于确定菜单对象在控件数组中的位置4.4. “帮助上下文帮助上下文ID”属性，用于指定帮助

51、文本的位置属性，用于指定帮助文本的位置5.5. “协调位置协调位置”属性（一般取属性（一般取0），与链接或嵌入对象的显示方式），与链接或嵌入对象的显示方式有关有关徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室6.6. “复选复选”属性，本项选中时，菜单项前加一属性，本项选中时，菜单项前加一“” 号号7.7. “有效有效”属性，本项选中时，菜单项加亮显示属性，本项选中时，菜单项加亮显示8.8. “可见可见”属性，本项选中时，菜单项可见属性，本项选中时，菜单项可见9.9. “显示窗口列表显示窗口列表”属性，用于显示多文档界面（属性，用于显示多文档界面（MDI

52、）子窗口列表子窗口列表徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室菜单编辑器的相关说明如果如果“标题标题”栏输入栏输入“”，则表示产生一分隔线，则表示产生一分隔线除分隔线外，菜单都可以接收除分隔线外，菜单都可以接收click事件事件在菜单项的字母前加在菜单项的字母前加&,则会在则会在&后一个字母下加下划线，后一个字母下加下划线，表示可以通过表示可以通过alt此字母打开此菜单此字母打开此菜单举例举例徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室创建弹出式菜单使用使用“菜单编辑器菜单编辑器”创建菜单创

53、建菜单菜单的菜单的“Visible”属性设为属性设为False在弹出式菜单的关联对象的在弹出式菜单的关联对象的MouseUp或者或者Mousedown事事件中添加代码：件中添加代码： 窗体名窗体名.PopupMenu 例题例题徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室1创建应用程序的界面时，在窗体上设置了一个命令按创建应用程序的界面时，在窗体上设置了一个命令按钮，运行程序后，命令按钮没有出现在窗体上，可能钮，运行程序后，命令按钮没有出现在窗体上，可能的原因是的原因是 _ 。 该命令按钮的该命令按钮的 Value 属性被设置为属性被设置为 False该

54、命令按钮的该命令按钮的 Enabled 属性被设置为属性被设置为 False该命令按钮的该命令按钮的 Visible 属性被设置为属性被设置为 False该命令按钮的该命令按钮的 Default 属性被设置为属性被设置为 True 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室若需要在同一窗口内安排两组相互独立的单选按钮若需要在同一窗口内安排两组相互独立的单选按钮（ OptionButton ），可使用），可使用 _ 控件将它控件将它们分隔开。们分隔开。 TexBox PictureBox Image Frame 徐州医学院徐州医学院VBVB教程教程公共

55、教育学院公共教育学院 计算机教研室计算机教研室3单击滚动条两端的箭头时，滚动条单击滚动条两端的箭头时，滚动条 Value 属性值的改属性值的改变量由变量由 _ 属性值决定。属性值决定。 LargeChange Max SmallChange Min 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室4. 下列语句中，正确的是：下列语句中，正确的是：A Text1.setfocus B Form1.clearC Label1.setfocus D List1.cls 5. 创建一个名为创建一个名为“文件文件”的菜单项，欲使其可用的菜单项，欲使其可用Alt+F方方式访问，则在菜单编辑器的