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

《VB常用控件与界面设计教程》由会员分享，可在线阅读，更多相关《VB常用控件与界面设计教程（111页珍藏版）》请在金锄头文库上搜索。

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

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

3、rderStylele外观外观返返回回或或设设置置对对象象的的边边框框样样式式2 2EnabledEnabled行为行为决定对象是否活动决定对象是否活动TrueTrue徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3.1.1窗体的属性、方法与事件VisibleVisible行为行为决定对象是否可见决定对象是否可见TrueTrueFontFont字体字体用用于于设设置置文文本本对对象象的的字字体体、字型、字号等字型、字号等MoveableMoveable位置位置决定窗体能否被移动决定窗体能否被移动TrueTrueLeftLeft位置位置对对象象左左边边界界

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

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

6、w包包含含一一个个关关闭闭按按钮钮，标标题题栏栏字字体体缩缩小小，窗窗口口大大小小可以改变，在可以改变，在Windows95Windows95任务栏不会显示任务栏不会显示。返回徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室常用窗体方法Hide：隐藏方法：隐藏方法Show：显示方法；：显示方法；Move：移动方法：移动方法Print：打印方法；：打印方法；Cls：清除方法：清除方法徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室常用窗体事件Click：单击事件；：单击事件；DblClick：双击事件；：双击事件；Loa

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

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

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

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

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

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

13、。显示，可以在末尾加上一个分号或逗号。6、有一些、有一些函数函数可以和可以和print一起控制输出的格式一起控制输出的格式徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室Print输出格式说明例如：DimaAsinteger,bAsintegera=100:b=300Printa,bPrinta;b输出结果为：100300/100和300之前相隔14个字符位置100300/在VB中输出数值数据时数值的前面有一个符号位，后面有一个空格。对于分号情况，如果是字符串，前后就不会有空格，例如：Print“你好”；”小熊”Print”你好小熊”结果：你好小熊你好小熊

14、徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室TabTab函数函数 SpcSpc函数函数 空格函数（空格函数（Space$Space$）与Print方法有关的函数 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室Tab函数格式：格式：Tab(n)Tab函数把光标移到由参数函数把光标移到由参数n指定的列指定的列(从从1开始计数，如开始计数，如果果n1）徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室4、ListCount属性属性列表框中的条目数列表框中的条目数ListCount（只

15、只读读属属性性）在在设设计计时时不不可可用用，只只能能在在程程序序中中使使用用。列列表表框框中中的的表表项项的的排排列列从从0开开始始，最最后后一一项项的的序序号号为为ListCount-1，例如：例如：则则X的值为列表框的值为列表框List1中的总项数中的总项数徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室5、List属性属性设置列表框中包含的项设置列表框中包含的项用用来来列列出出表表项项的的内内容容，List属属性性实实质质上上是是个个一一维维字字符符串串数数组组，其其下下界界为为0，上上界界为为ListCount-1。每一元素存放列表框中的一个条目

16、。每一元素存放列表框中的一个条目。List属属性性和和ListCount、ListIndex属属性性结结合合起起来来使用使用。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室其格式是：其格式是： .List () =例如：例如：Listl.List(0)“汉族汉族”把把Listl的第一行的文本定义为的第一行的文本定义为“汉族汉族”。可可以以通通过过下下标标访访问问数数组组中中的的值值（从从0开开始始），格格式为：式为：S$=列表框列表框.List（下标）（下标）例如：例如：S$=List1.list(5)将列出列表框将列出列表框List1中第六项的内容中第

17、六项的内容徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室6、ListIndex属性属性v表示当前所选条目的序号（表示当前所选条目的序号（0ListCount-1）；）；v若若列列表表框框支支持持多多选选，则则ListIndex属属性性的的值值是是最最后后一一个个被选中条目的序号；被选中条目的序号；v若若没没有有条条目目被被选选中中，则则此此属属性性的的值值为为-1。只只能能在在程程序序中使用。中使用。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室7、MultiSelect属性属性设置是否能够选择多项设置是否能够选择

18、多项MultiSelect=0：不允许复选（缺省值）不允许复选（缺省值）。MultiSelect=1：简单复选。鼠标单击或按下空格键，在简单复选。鼠标单击或按下空格键，在列表中选中或取消选中项列表中选中或取消选中项,使用箭头键移动焦点。使用箭头键移动焦点。 MultiSelect=2：扩展复选。扩展复选。按下按下SHIFT并单击鼠标并单击鼠标或或按箭头键按箭头键选择连续的多项选择连续的多项。按下按下CTRL并单击鼠标并单击鼠标选择不选择不连续的多项（或取消选中项）。连续的多项（或取消选中项）。MultiSelect属性在运行时是只读的，也就是说不能利属性在运行时是只读的，也就是说不能利用程序代

19、码改变它的值。用程序代码改变它的值。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室 8 8、Style属性属性控制列表框的外观控制列表框的外观 Style=0：默认值，标准样式，单击选项即可选中。：默认值，标准样式，单击选项即可选中。 Style=1：复选框样式，列表框的每个项目以复选框：复选框样式，列表框的每个项目以复选框 的形式的形式显示（不受显示（不受MultiSelect属性的影响）。属性的影响）。 Style 属性属性在运行时是只读的。在运行时是只读的。 Style=0 Style=1徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院

20、 计算机教研室计算机教研室10、Selected属性属性 Selected属性是一个逻辑型数组属性是一个逻辑型数组（与（与List和和ItemData属性类似）属性类似），其，其中的每个元素对应列表框中的一个选项的选择状态：中的每个元素对应列表框中的一个选项的选择状态： List1.Selected(i) = True 时，对应项被选中；时，对应项被选中； List1.Selected(i) = False 时，对应项没有选中。时，对应项没有选中。 Selected属性的语法为：属性的语法为： 列表框名列表框名.Selected() = 此属性不能在属性窗口中使用此属性不能在属性窗口中使用例如

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

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

23、tem删除项序号删除项序号该方法一次只能删除一个项目。该方法一次只能删除一个项目。例如：例如：List1.RemoveItem03、Clear方法方法删除列表框中的所有项。删除列表框中的所有项。格式：格式：列表框对象名列表框对象名.Clear4、Move 方法方法徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室列表框事件列表框接收列表框接收Click事件、事件、Dbclick事件事件通常把列表框和命令按钮组合使用通常把列表框和命令按钮组合使用例例:交换两个列表框中的项目交换两个列表框中的项目徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算

24、机教研室计算机教研室5、组合框（ComboBox） 组合框由一个列表框和一个文本框组成，用户既可以组合框由一个列表框和一个文本框组成，用户既可以像在文本框一样在组合框中直接输入文本来选定项目，像在文本框一样在组合框中直接输入文本来选定项目，也可从列表中选定项目。也可从列表中选定项目。组合框具备列表框的属性。组合框具备列表框的属性。组合框的属性组合框的属性：Text、List、ListIndex、ListCount和和Selected属性属性方法方法：AddItem、RemoveItem、Clear事件事件：Click、DbClick。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院

25、 计算机教研室计算机教研室组合框另外具有与列表框不同的属性组合框另外具有与列表框不同的属性StyleStyle组合框样式由组合框样式由Style属性来控制，如表所示：属性来控制，如表所示：组合框组合框Style属性设置属性设置设置值设置值VB常数常数说明说明0vbComboDropDown（缺缺省省值值）下下拉拉式式组组合合框框。包包括括一一个个下下拉拉式式列列表和一个文本框，表和一个文本框，（可输入文本可下拉）（可输入文本可下拉）1vbComboSimple简简单单组组合合框框。包包括括一一个个文文本本框框和和一一个个不不能能下下拉拉的列表的列表（可输入文本不能下拉）（可输入文本不能下拉）2

26、vbComboDropDownList下拉式列表框。仅允许从下拉式列表中选择下拉式列表框。仅允许从下拉式列表中选择（不能输入文本可下拉）（不能输入文本可下拉）徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室6、 图形控件 VB6.0包含包含4个图形控件：个图形控件：pictureBox控件控件Image控件控件Shape控件控件Line控件控件徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室图片框、图像框的属性、事件和方法 PictureBox称为称为图片框图片框Image控件称为控件称为图像框图像框图片框和图像框可以

27、显示的图像文件格式有：图片框和图像框可以显示的图像文件格式有：位图文件位图文件(BMP)、图标文件、图标文件(ICO)、JPEG格式文件、格式文件、GIF格式文件。格式文件。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室与窗体属性相同的属性1、Name属性属性对象名对象名2、Left,Top,Width,Height,Visible,Enabled属性属性3、BorderStyle属性属性边框样式边框样式0：无边框：无边框1：有边框（默认）：有边框（默认）4、FontBold等字体属性等字体属性徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院

28、 计算机教研室计算机教研室5、Picture属性属性Picture属性用于窗体、图片框和图象框，它可以通过属属性用于窗体、图片框和图象框，它可以通过属性窗口设置，用来把图形放入这些对象中。性窗口设置，用来把图形放入这些对象中。6、StretchStretch属性属性属性属性Stretch属性只用于图象框属性只用于图象框来指定一个图形是否要调整大来指定一个图形是否要调整大小，以适应图像框控件的大小（小，以适应图像框控件的大小（True：缩放图像；：缩放图像；False（默认值）：图像以原始大小显示）。（默认值）：图像以原始大小显示）。其语法为：其语法为：.Stretch=徐州医学院徐州医学院VB

29、VB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室图形文件的装入1、图片框与图象框的区别、图片框与图象框的区别（1）图片框（）图片框（PictureBox）是容器控件，而图象框（）是容器控件，而图象框（Image）不是。）不是。（2）图片框可以通过）图片框可以通过Print方法接收文本，而图象框不能。方法接收文本，而图象框不能。（3）图象框比图片框占用的内存少，显示速度快。）图象框比图片框占用的内存少，显示速度快。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室2、在设计阶段装入图形文件、在设计阶段装入图形文件（1）用属性窗口中的）用属性窗口中

30、的Picture属性装入属性装入（2）通过）通过“复制复制”、“粘贴粘贴”命令装入窗体、图片框或图形命令装入窗体、图片框或图形框。框。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3、在运行期间装入图形文件、在运行期间装入图形文件LoadPicture函数函数LoadPicture函数用于在代码中将图形载入到窗体、函数用于在代码中将图形载入到窗体、PictureBox控件或控件或Image控件中。控件中。其语法为：其语法为：LoadPicture()Picture1.PictureLoadPicture(D:usoscap.bmp)说明：说明：不带参数的

31、不带参数的LoadPicture()函数，是使图像控件函数，是使图像控件不显示任何图像，使该图片框变为空白不显示任何图像，使该图片框变为空白,用来删除图象用来删除图象.徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室 编程程实现三个三个图片框中片框中图片的片的轮换，并使得一个，并使得一个图片片框中可以框中可以显示整个示整个图片。片。（1 1）界面）界面设计在窗体上添加如在窗体上添加如图所示三个所示三个图片框控件片框控件Picture1、Picture2、Picture3。将。将Picture3的的AutoSize属性属性设置置为True。其他属性。其他属性

32、值为默默认值。 （a）设计时界面）设计时界面 （b）运行时界面）运行时界面 （c）响应事件）响应事件例题例题例题例题徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室（2）事件代码）事件代码Private Sub Form_Load() Picture1.Picture = LoadPicture(c:steamship.gif) Picture2.Picture = LoadPicture(c:bus.gif) Picture3.Picture = LoadPicture(c:car.gif)End Sub 或静态装入三幅图或静态装入三幅图或静态装入三幅图

33、或静态装入三幅图Private Sub Picture3_Click() Form1.Picture = Picture3.Picture Picture2.Picture = Picture1.Picture Form1.Picture = LoadPicture()End Sub徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室直线和形状Shape、Line控件为轻量图形控件，比控件为轻量图形控件，比PictureBox控件控件显示速度快。显示速度快。Shape控件和控件和Line控件不支持任何事件。控件不支持任何事件。徐州医学院徐州医学院VBVB教程教

34、程公共教育学院公共教育学院 计算机教研室计算机教研室主要属性：主要属性：BorderColorBoderStyle（7种值）种值）BoderWidth（边界宽度）（边界宽度）BackStyle BackStyle （0 0为透明，为透明，1 1为不透明）为不透明）FillColor FillColor FillStyle FillStyle （8 8种值）种值）徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室Shape控件的Shape属性图4-8Shape属性确定的形状表表4-4Shape控件的预定义图形控件的预定义图形图形名称图形名称数值数值常量常量矩形

35、矩形0vbShapeRectangle正方形正方形1vbShapeSquare椭圆形椭圆形2vbShapeOval圆形圆形3vbShapeCircle圆角矩形圆角矩形4vbShapeRoundedRectangle圆角正方形圆角正方形5vbShapeRoundedSquare徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室7 7、选择控件、选择控件 复选框和单选按钮复选框和单选按钮复选框（复选框（CheckBox）复复选选框框通通过过Value属属性性指指示示其其所所处处的的状状态态。无无论论何何时时，当用户单击复选框时都将触发其当用户单击复选框时都将触发

36、其Click事件。事件。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室单选框（单选框（OptionButton又称为选项按钮）又称为选项按钮）也也是是提提供供选选择择项项的的控控件件，它它是是从从多多个个可可选选项项中中选选择择一一项项的操作。的操作。单单选选框框和和复复选选框框看看起起来来相相似似。因因此此，可可以以把把复复选选框框中中的的操作方法用到单选框上来。操作方法用到单选框上来。它它们们之之间间的的区区别别是是：单单选选框框一一般般用用于于单单项项选选择择，而而复复选选框则可以用于多项选择。框则可以用于多项选择。徐州医学院徐州医学院VBVB教程

37、教程公共教育学院公共教育学院 计算机教研室计算机教研室单选框和复选框的重要属性、事件和方法单选框和复选框的重要属性、事件和方法1、Name属性属性对象名对象名2、Left、Top、Width、Height、Visible、Enabled属性属性3、Caption属性属性标题文字标题文字4、Style属性属性选框的样式选框的样式0：标准样式（默认）显示：标准样式（默认）显示1：以命令按钮的样式显示：以命令按钮的样式显示复选框（左）和单选按钮（右）复选框（左）和单选按钮（右）复选框和单选按钮（未选中状态）复选框和单选按钮（未选中状态）复选框和单选按钮（选中状态）复选框和单选按钮（选中状态）徐州医学

38、院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室5、Alignment属性属性0：框在文字左边（默认）：框在文字左边（默认）1：框在文字右边：框在文字右边6、Value属性属性复选框复选框：Value=0表示未选中（默认）表示未选中（默认）Value=1表示选中表示选中Value=2复复选框框为灰色，表示禁止用灰色，表示禁止用户选择。单选框单选框：Value=True表示选中表示选中Value=False表示未选中（默认）表示未选中（默认）7、Move方法方法8、Click事件事件例题例题徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计

39、算机教研室8、 框架 在在中，可以作为其他对象容器除窗体和图片控件外，中，可以作为其他对象容器除窗体和图片控件外，还有框架控件（还有框架控件（Frame）。）。在容器中的控件，可以随载体同时移动，控件的位置在容器中的控件，可以随载体同时移动，控件的位置也相对容器的位置而设置。也相对容器的位置而设置。Frame控件不仅可以作为其他控件的载体，而且可用控件不仅可以作为其他控件的载体，而且可用它将其他控件分成可标识的控件组。它将其他控件分成可标识的控件组。例如，用例如，用Frame控件对控件对OptionButton控件分组等。控件分组等。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院

40、 计算机教研室计算机教研室1.属性属性（1）Caption属性属性Caption属性设定框架上的标题名称。如果属性设定框架上的标题名称。如果Caption为空为空字符，则框架为封闭的矩形框，但区别于矩形控件。字符，则框架为封闭的矩形框，但区别于矩形控件。（2）Enabled属性属性当当Enabled为为False时，程序运行时该框架在窗体中的标时，程序运行时该框架在窗体中的标题正文为灰色，表示框架中的所有对象均被屏蔽，不允许题正文为灰色，表示框架中的所有对象均被屏蔽，不允许用户对其进行操作。用户对其进行操作。（3）Visible属性属性当当Visible为为False时，则程序运行时框架及其所

41、有控件全部时，则程序运行时框架及其所有控件全部被隐蔽起来。被隐蔽起来。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室2.事件事件框架可以响应框架可以响应Click和和DbClick事件，但应用程序中事件，但应用程序中一般不需要编写框架的事件过程。一般不需要编写框架的事件过程。例：用框架对单选按钮分组例：用框架对单选按钮分组徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室9、 滚动条 滚动条包括滚动条包括水平滚动条（水平滚动条（HScrollBar）和垂直滚动条）和垂直滚动条(VScrollBar)，可以作为图形辅助控

42、件和输入设备。可以作为图形辅助控件和输入设备。属性属性1.Value属性属性Value属性值为滚动块在滚动条中位置的数值。属性值为滚动块在滚动条中位置的数值。当滚动块处于当滚动块处于最左边最左边或或最顶端最顶端时，时，Value取取最小值最小值。反之，。反之，则则Value值取值取最大值最大值。在中间的各个位置，在中间的各个位置，Value值与位置是严格按照比例来设值与位置是严格按照比例来设定的。定的。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室改变滚动条Value属性的方法有4种：直接在属性窗口中设定直接在属性窗口中设定Value值；值；鼠标单击两端

43、箭头键改变滚动条数值；鼠标单击两端箭头键改变滚动条数值；将滚动块沿滚动条拖动到任意位置；将滚动块沿滚动条拖动到任意位置；用鼠标单击滚动条中滚动块两侧的部分使滚动块以用鼠标单击滚动条中滚动块两侧的部分使滚动块以翻页的速度移动。翻页的速度移动。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室2.Max和和Min属性属性Value属性的取值范围由属性的取值范围由Max和和Min属性设置：属性设置：Max代表代表Value的最大值，的最大值，Min代表代表Value的最小值。的最小值。Value属性的缺属性的缺省值为省值为0和和32767。3.LargeChang

44、e和和SmallChange属性属性LargeChange：单击滚动块前面和后面时，：单击滚动块前面和后面时，Value增加或减增加或减少的增量少的增量SmallChange：单击滚动条两端的箭头时，：单击滚动条两端的箭头时，Value增加或减增加或减少的增量少的增量徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室事件 1.Change事件事件在滚动块移动后发生，它是滚动条最重要的事件。在滚动块移动后发生，它是滚动条最重要的事件。2.Scroll事件事件鼠标鼠标拖动拖动滚动块时发生。单击滚动箭头或滚动条时滚动块时发生。单击滚动箭头或滚动条时不发生。不发生。

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

46、terval指定定时器事件发生的间隔指定定时器事件发生的间隔毫秒毫秒数，间隔的取值在数，间隔的取值在065535之间，最长的间隔大约为之间，最长的间隔大约为1分钟分钟在程序运行期间，定时器并不可见在程序运行期间，定时器并不可见。当当Interval属性值为属性值为0时屏蔽定时器时屏蔽定时器（2）Enabled属性属性Enabled属性控制定时器是否生效。属性控制定时器是否生效。徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室2事件事件定时器控件只有一个定时器控件只有一个Timer事件。在一个事件。在一个Timer控件的控件的预定的时间间隔过去之后发生。预定

47、的时间间隔过去之后发生。例题例题1：建立数字计时器：建立数字计时器例例2：用计时器放大字体：用计时器放大字体例例3：抽奖程序：抽奖程序徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3.33.3制作菜单3.3.1 菜单概述3.3.2 使用菜单编辑器 徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3.3.1菜单概述Windows程序界面中的菜单由以下元素组成程序界面中的菜单由以下元素组成：菜菜单单条条：每每个个菜菜单单的的标标题题，如如“文文件件”、“编编辑辑”和和“帮帮助助”等；等；菜单菜单：用鼠标单击菜单条上的菜单

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

49、窗口工具栏上的窗口工具栏上的“菜单编辑器菜单编辑器”按钮按钮，屏幕上，屏幕上出现出现“菜单编辑器菜单编辑器”的对话框的对话框徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室菜单编辑器徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室设置菜单属性设置菜单属性1.1.“标题标题”属性，用于菜单显示。输入属性，用于菜单显示。输入“-”-”，则在两个菜单命令，则在两个菜单命令项间加一分隔线项间加一分隔线2.2.“名称名称”属性属性( (不得确省不得确省) )，用于在代码中引用菜单命令项，用于在代码中引用菜单命令项3.3.“索引索

50、引”属性，用于确定菜单对象在控件数组中的位置属性，用于确定菜单对象在控件数组中的位置4.4.“帮助上下文帮助上下文ID”属性，用于指定帮助文本的位置属性，用于指定帮助文本的位置5.5.“协调位置协调位置”属性（一般取属性（一般取0），与链接或嵌入对象的显示方式），与链接或嵌入对象的显示方式有关有关徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室6.6.“复选复选”属性，本项选中时，菜单项前加一属性，本项选中时，菜单项前加一“”号号7.7.“有效有效”属性，本项选中时，菜单项加亮显示属性，本项选中时，菜单项加亮显示8.8.“可见可见”属性，本项选中时，菜单项

51、可见属性，本项选中时，菜单项可见9.9.“显示窗口列表显示窗口列表”属性，用于显示多文档界面（属性，用于显示多文档界面（MDI）子窗口列表子窗口列表徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室菜单编辑器的相关说明如果如果“标题标题”栏输入栏输入“”，则表示产生一分隔线，则表示产生一分隔线除分隔线外，菜单都可以接收除分隔线外，菜单都可以接收click事件事件在菜单项的字母前加在菜单项的字母前加&,则会在则会在&后一个字母下加下划线，后一个字母下加下划线，表示可以通过表示可以通过alt此字母打开此菜单此字母打开此菜单举例举例徐州医学院徐州医学院VBVB教程

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

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

54、ageFrame徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室3单击滚动条两端的箭头时，滚动条单击滚动条两端的箭头时，滚动条Value属性值的改属性值的改变量由变量由_属性值决定。属性值决定。LargeChangeMaxSmallChangeMin徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室4.下列语句中，正确的是：下列语句中，正确的是：CLabel1.setfocusDList1.cls5.创建一个名为创建一个名为“文件文件”的菜单项，欲使其可用的菜单项，欲使其可用Alt+F方方式访问，则在菜单编辑器的标题文本

55、框中应输入：式访问，则在菜单编辑器的标题文本框中应输入：A文件（文件（$F)B文件（文件（&F)C文件（文件（#F)D文件（文件（%F)徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室（6）在窗体上画一个列表框和一个命令按钮，其名称分别为）在窗体上画一个列表框和一个命令按钮，其名称分别为List1和和Command1，然后编写如下事件过程：，然后编写如下事件过程：PrivateSubForm_Load()List1.AddItemItem1List1.AddItemItem2List1.AddItemItem3EndSubPrivateSubCommand

56、1_Click()List1.List(List1.ListCount)=AAAAEndSub程序运行后，单击命令按钮，其结果为程序运行后，单击命令按钮，其结果为A）把字符串）把字符串“AAAA”添加到列表框中，但位置不能确定添加到列表框中，但位置不能确定B）把字符串）把字符串“AAAA”添加到列表框的最后（即添加到列表框的最后（即“Item3”的后面）的后面）C）把列表框中原有的最后一项改为）把列表框中原有的最后一项改为“AAAA”D）把字符串）把字符串“AAAA”插入到列表框的最前面（即插入到列表框的最前面（即“Item1”的前面）的前面）徐州医学院徐州医学院VBVB教程教程公共教育学院公

57、共教育学院 计算机教研室计算机教研室（7）在窗体上画一个命令按钮、一个文本框和一个计时器控件，名称分）在窗体上画一个命令按钮、一个文本框和一个计时器控件，名称分别为别为Command1,Text1和和Timer1,在属性窗口中把计时器的在属性窗口中把计时器的Interval属性属性设置为设置为1000，Enabled属性设置为属性设置为False,程序运行后，如果单击命令按程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序：操作的程序：PrivateSubCommand1_Click()E

58、ndSubPrivateSubTimer1_Timer()Text1.Text=TimeEndSub在在_处应填入的内容是处应填入的内容是A)Enabled=TrueB)Enabled=FalseC)Visible=TrueD)Visible=False徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室(8)假定在图片框假定在图片框Picture1中装入了一个图形，为了清除中装入了一个图形，为了清除该图形（不删除图片框），应采用的正确方法是：该图形（不删除图片框），应采用的正确方法是：A)选择图片框，然后按选择图片框，然后按Del键键B)执行语句执行语句Pi

59、cture1.Picture=LoadPicture(“”)C)执行语句执行语句Picture1.Picture=”D)选择图片框，在属性窗口中选择选择图片框，在属性窗口中选择Picture属性，然后按属性，然后按回车键回车键徐州医学院徐州医学院VBVB教程教程公共教育学院公共教育学院 计算机教研室计算机教研室（9）在窗体上画一个）在窗体上画一个List1的列表框，一个名称为的列表框，一个名称为Label1的标签，列表框的标签，列表框中显示若干个项目，当单击列表框中的某个项目时，在标签中显示被中显示若干个项目，当单击列表框中的某个项目时，在标签中显示被选中的项目的名称，下列能正确实现上述操作的程序是选中的项目的名称，下列能正确实现上述操作的程序是A)PrivateSubList1_Click()Label1.Caption=List1.ListIndexEndSubB)PrivateSubList1_Click()Label1.Name=List1.ListIndexEndSubC)PrivateSubList1_Click()Label1.Name=List1.TextEndSubD)PrivateSubList1_Click()Label1.Caption=List1.TextEndSub