vb_06常用标准控件

nullnull第六章常用标准控件 null第一节 文本控件 一、标签（Label） 用于显示一段文本信息。 一般用于标识没有 Caption 属性的控件，给它们加上一个标题，或显示一段正文 ( 如安装信息 ) 或其它一些不想让用户修改的信息，它的长度最长可设为 1024字节。 在工具箱中的标签控件是 按钮。null1、主要属性 ①、名称属性(Name)：前缀Lbl。 ②、标题属性(Caption)：设置显示在标签上的文本。 ③、对齐属性 (Alignment)：用来设置标签上文本的对齐方式，有左对齐、右对齐和中对齐三种；系统默认使用左对齐方式： 0——代表左对齐 1——代表右对齐 2——代表中对齐。null④、自动缩放属性 (Autosize)：用于设置标签的大小是否随显示文本的多少自动进行调整； 如果被设置为 True，则自动进行调整； 系统默认设置为 False。 ⑤、边框属性 (BorderStyle)：设置标签的边框类型：0 代表标签无边框，1 代表有一条线的边框； 配合 Appearance（外观属性：平面、立体）的设置可以具有三维效果（如同一个文本框）。null⑥、文本卷绕属性 (WordWrap)（自动换行属性）：用来决定 AutoSize属性为 True的 Label 控件超过宽度的文本的扩展方式； True——垂直扩展   False——水平扩展 设置此属性的语句是： LblText.WordWrap=True或 False。 null2、常用的事件 一般情况下，从标签扮演的角色来谈，不需要通过某种操作产生什么事件，不写事件代码； 当然严格地讲，也可以有它的事件： 鼠标单击事件 (Click) 鼠标双击 (DblClick) 鼠标移动事件 (MouseMove)。null二、文本框 用于显示和输入文本。 1、常用属性： ①、名称属性（Name）: 名称前缀为 TXT； ②、文本属性 (Text)：是显示在文本框中的文本内容。 ③、长度限制属性 (MaxLength)：用来设置用户在文本框中输入的字符串的最大长度；null系统默认此设置为 0，表示文本输入的最大长度在文本框所能容纳的字符数之内没有限制； 在数据库程序中一般应设置为一个具体设置，如用户登陆输入框中的用户名总不能无限长。 文本框所能容纳的字符数是 32K. ④、多行属性 (MultiLine)：用来设置文本框是否能显示或输入多行文本。null⑤、密码字符属性 (PassWordChar)：用指定的字符代替输入到文本框中的文本，起到屏蔽输入回显的功能； 一般用户输入的密码是不能显示的。null⑥、滚动条属性 (ScrollBar)：MultiLine为 True的前提下，用来设置是否需要附带滚动条； 0 ——不添加滚动条（默认） 1 ——添加水平滚动条 2 ——添加垂直滚动条 3 ——同时添加水平和垂直滚动条 当 MultiLine设为 True时，才能设置滚动条属性。当 MultiLine设为 False时，不论 ScrollBar 为何值，都不会出现滚动条。null⑦、选择属性（SelText）：用于返回或设置包含当前所选中文本的字符串；（选中的目的） 使用剪贴板的 SetText 方法将文本框中选中的文本复制到剪贴板： Clipboard.SetText  Text1.SelText 通过重新设置文本框的 SelText 属性实现粘贴操作： Text1.SelText = Clipboard.GetTextnull⑧、SelStart：返回被选文本第一个字符的位置，也可用于设置欲选文本第一个字符的位置。 SelStart  属性是一个数字，指示文本串内的插入点，其中   0  表示最左边的位置，往后依次为 1，2，3 ……。如为 0，则从第一个字符开始被选中。 ⑨、SelLength：用于设置从 SelStart 开始的欲选文本的长度，或者返回被选文本的长度。 null⑩、只读属性（Locked） 用于阻止用户改变文本框的内容，用户只可以看文本而不能改变它。 为True，则不能修改。 默认为False。 null4.在Visual Basic中通过属性来设置字体的颜色 A 。 A)FontColor B)ClipControl C)BackColor D)ShowColor null2、主要事件 支持鼠标单击、双击、按下、弹起等事件，除此以外，还有下列常用事件。 ①、文本改变事件 (Change) 是默认事件；当文本框中的文本被改变时，就会产生这个事件。 ②、获得焦点事件（GetFocus） 当用户用 Tab 健或鼠标单击文本框使其获得焦点后，将会发生这个事件。 null③、失去焦点事件 (LostFocus) 当用户用 Tab 健或鼠标单击选择了其它的控件后，文本框将会失去焦点，发生这个事件 ④、键盘事件 主要有：keydown ——按下事件、keyup ——弹起事件和 kepress ——按键事件。null事件过程的形式为：  PrivateSub Form_KeyDown(KeyCodeAs Integer,Shift As Integer)               < 语句 >  End Subnull例如，如果希望将文本框中的所有字符都强制转换为大写字符，则可在输入时使用此事件转换大小写： PrivateSub Text1_KeyPress (KeyAscii As Integer)   KeyAscii = Asc(Ucase(Chr(KeyAscii))) End Subnull⑤、设置焦点的方法——setfocus 格式：对象·setfocus 功能：使指定对象获得焦点。 对于文本框，使插入点出现在文本框中，让用户输入内容。 如在用户登录框中，初始时刻，可让插入点出现在用户框中。null例：用户登录框中，用户名要求是大写字母，口令要求是0-9的数字字符。 Private Sub Txtusername_KeyPress(KeyAscii As Integer) KeyAscii = Asc(UCase(Chr(KeyAscii))) End Sub Private Sub Txtpassword_KeyPress(KeyAscii As Integer) If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then KeyAscii = 0 Beep End If End Subnull1、为了使标签覆盖背景，应把BackStyle属性设置为（ ） A.0 B.1 C.True D.False 2、为了使标签中的内容居中显示，应把Alignment属性设置为（ ） A.0 B.1 C.2 D.3null3、决定标签内显示内容的属性是（ ） A.Text B.Name C.Alignment D.Caption 4、以下控件没有Click事件是 。 A)TextBox B)Label C)Timer D)Imagenull5、窗体上有一个名为Label1的标签，为了使该标签透明并且没有边框，正确的属性能设置为 。 A）Label1.BackStyle=0 Label1.BorderStyle=0 B）Label1.BackStyle=1 Label1.BorderStyle=1 C）Label1.BackStyle=true Label1.BorderStyle=true D）Label1.BackStyle=False Label1.BorderStyle=Falsenullnull第二节 图形控件 Windows 应用程序中经常使用的几种图象文件格式：BMP、ICO、WMF、JPEG、GIF。 一、图像框 图象控件在工具箱是一个 图片。 1、主要属性 ①、Name属性 ( 名称 )：前缀为：IMG。 ②、Picture属性：指定要显示的图片。 三种方法可将图片加载到图像控件中。null从属性窗口中选择 Picture属性。 在程序代码中使用 LoadPicture语句，具体如下： Image1.Picture= LoadPicture( “ c:\windows\clouds.bmp ” ) 用剪贴板加载；将要加载的图象复制到剪贴板上，把焦点移到图象控件上，然后执行粘贴命令。 null③、Stretch 属性：用于决定是否自动地放大或缩小图象，以适应图象框的大小。 当 Stretch=True时：自动缩放图片以适应图片框的大小。 当 Stretch=False时：自动缩放图片框以适应图片的大小(与 PictureBox 控件的 AUTOSIZE为 TRUE功能相同)。null④、BorderStyle属性：设置边框类型。 0：无边框；1：有边框。 让它的边框发生变化，具有命令按钮所具有的“按下”和“弹回”功能。 又如：做出 WORD 格式工具栏上“ B ”或“ U ”按钮的弹起与按下的效果。 2、常用事件 单击（Click）事件：Image控件可以识别  Click  事件，因此可在需要用按钮的地方使用该控件。null二、图片框控件（PictureBox） 用来显示图形、作为其它控件的容器和显示 Print 方法输出的文本。 它在工具箱中是一个 图片。 1、主要属性 ①、Name属性 ( 名称 )：前缀为：PIC。 ②、图片属性（Picture）：指定要显示的图片。 ③、对齐属性（Align）：确定图片框在窗体上的显示位置。 null0 ——图片框显示的位置由 Height、Width、Left、Right 这四个属性决定。 1 ——图片框与窗体一样宽，同时对齐窗体的上端。 2 ——图片框与窗体一样宽，同时对齐窗体的下端。 3 ——图片框与窗体一样高，同时对齐窗体的左端。 4 ——图片框与窗体一样高，同时对齐窗体的右端。 使用  Align  属性可以在窗体的顶部或底部创建工具栏或状态栏。 null④、自动放缩属性（AutoSize）：决定图片框是否自动改变大小以显示其全部的图形内容。 可以设置为 True和 False两个数值。 当 AutoSize=False时（缺省值），保持图片和图片框的大小不变； 当 AutoSize=True时，自动改变图片框的大小以显示图形的全部内容；null三、直线 使用线段控件可以在窗体、框架和图片框上画直线，可以增加程序界面的可视性。 它在工具箱中用一条线段 表示。 ①、Name属性 ( 名称 )：前缀为：LIN。 ②、X1，Y1，X2，Y2：位置坐标。 null③、BorderStyle属性：设置线段的样式，共有七种样式可供选择： 透明   0 实线   1 虚线   2 点线   3 点划线   4 双点划线   5 内实线   6 ④、BorderColor 属性：用来设置线段的颜色。 可以在属性窗口通过调色板来设置或者在运行时通过使用 QBColor 函数或 R、G、B 来设置。null⑤、BorderWidth 属性：用来设置线段的宽度。 可设置值为 1 到 1892 之间的任一整数值，缺省值为 1。 2、主要事件 不支持任何事件。null四、形状控件（Shape） 形状控件和线段控件一样都可以用来增强界面的可视性，它可以在窗体、框架或图片框中画矩形、正方形、椭圆形、圆形、圆角矩形、圆角正方形。 它在工具箱用 表示。 1、主要属性 ①、Name属性 ( 名称 )：名称前缀为：SHP。 ②、Shape属性：图形样式。 形状控件可以画出六种二维图形。 null2、主要事件 单击（Click）事件； 也可用 MouseDown 和 MouseUp 实现弹起与按下的功能。  PictureBox  可作为其它控件的容器。这些控件随  PictureBox  移动而移动，其  Top  和  Left  属性是相对  PictureBox  而言，而与窗体无关。 PictureBox  容器的一种普通用法是 ToolBar或StatusBar。 null③、Left、Top、Height、Width 和线段控件不同，形状控件使用 Left、Top、Height、Width 这四个属性来设置图形相对窗体或其他容器控件的位置。 ④、BorderStyle和 BorderWidth 与直线控件相同。 null⑤、FillStyle和 FillColor 属性 用 FillStyle属性设置填充图形时的方式，有８种方式可供选择，如下表所示： ０    实线 １    透明（缺省值） ２    水平直线 ３    垂直直线 ４    上斜对角线 ５    下斜对角线 ６    十字线 ７    交叉对角线null使用 FillColor 属性来设置填充闭合图形时使用的颜色。 2、主要事件 不支持任何事件；null0    矩形 1   正方形 2   椭圆形 3   圆形 4   圆角矩形 5   圆角正方形 null6、下列可以把当前目录下的图形文件pic1.jpg装入窗体FORM1中的语句为（ ） A.FORM1 = "pic1.jpg" B.FORM1.Handle = "pic1 .jpg" C.FORM1.Picture = LoadPicture("pic 1.jpg") D.FORM1 = LoadPicture("pic 1.jpg")null7、图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是（ ） A. Autosize B. Stretch C. AutoRedraw D. Appearance 8、下列关于图片框的语句中错误的是 。 A）Picture1.Picture=Picture2.Picture B）Picture1.Picture=LoadPicture("C:＼vb60＼Arw04Up.ico") C）Picture1.Print Tab(20); CurrentX, CurrentY D）Picture1.Stretch=Truenull9、窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是 。 Private Sub Command1_Click() Picture1.Picture=LoadPicture("c:＼1.jpg") Picture1.Cls Picture1.Print "Test" End Sub A)窗体无显示，图片框显示图片和文字Test B)窗体上出现Test文本，图片框无显示 C)窗体上出现Test文本，图片框显示图片1.jpg D)窗体无显示，图片框只显示Test文字null第三节 按钮控件 在 Visual Basic 中使用最多的一个控件是命令按钮（CommandButton），用鼠标单击它产生 Click 事件，进而发出一组指令用来启动、中断或者结束一个进程。 它在工具箱中是一个矩形的按钮 。 一、常用属性 ①、Caption：设置显示在按钮上面的文本。nullCaption  属性还可以赋予按钮一个访问键： 访问键的字符前加一个 ＆ 符号 如：“确定（&O）” 访问键：在 caption 属性中以 & 引导的字符就作为访问键字符。 在程序运行时该字符就带有一个下划线，同时按下 ALT 键和带下划线的字符就相当于单击此按钮。 “确定（O）”null②、Name（名称）： CMD前缀。 ③、Default（默认属性）：当一个按钮的 Default 属性被设置为 True，则这个按钮称为确定按钮，按下 Enter 键与单击该按钮的作用相同。 一个窗体中只有一个按钮的 Default  属性可以被设置为 True。 表现形式（内侧有一个虚线圈）。null④、Cancel（取消属性）：当一个按钮的 Cancel 属性被设置为 True，则这个按钮称为取消按钮，按下 ESC 键与单击该按钮的作用相同。 窗体中只能有一个按钮的 Cancel 属性可以被设置为 True； 另外一个按钮的 Default（默认属性）和 Cancel（取消属性）这两个属性并不矛盾，对同一个按钮而言，这两个属性可以都为 True；null⑤、Enable（禁用属性）：用来确定按钮是否能够对用户产生的事件作出反应，如果被设置为 False则在程序运行时按钮呈灰色显示，不能进行任何操作。 Enable属性可以在创建界面时设置，也可以在程序代码中进行设置。 动态改变的，反映程序执行过程中的因果关系。null⑥、Visble：用来设置按钮是否可见，当 Visble属性设置为 True时按钮可见，如果设置为 False即不可见，Visble属性也可以在程序运行时进行设置。 ⑦、Style：设置按钮的显示类型，有标准 (Standard) 和图形 (Graphical) 两种类型。null⑧、Picture：当按钮的显示类型是图形类型时，用于设置显示在按钮表面上的图形。 在属性窗口单击此属性将弹出一个文件选择对话框选择所需的图形文件，在程序代码中使用语句： Cmdopen.Picture=Loadpicture（“图形文件的路径和文件名”） 进行设置。null⑨、Tooltiptext 属性 显示当鼠标移动到按钮上暂停时，说明提示文本。当用按钮制做工具栏上的按钮时，这个提示非常有用。 另外：Top，Left 属性，Height，Width 属性决定坐标及大小。nullnull二、常用事件 按钮有许多事件，经常使用的有鼠标单击 (Click) ——默认事件、鼠标移动 (MouseMove)、鼠标按下 (MouseDown) 和鼠标弹起 (MouseUp)。null10、为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（ ） A.Value B.Default C.Cancel D.Enabled 11、为了在按下Esc键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（ ） A.Value B.Default C.Cancel D.Enablednull13、关于Image控件和PictureBox控件的说明，其中错误的是 。 A）Image控件和PictureBox控件都有Picture属性 B）Image控件和PictureBox控件都支持Print方法 C）Image控件和PictureBox控件都可以用LoadPicture函数把图形文件装入控件中 D)Image控件和PictureBox控件都能在属性窗口装入图形文件，也都能在运行期间装入图形文件null第四节 选择控件——复选框和单选按钮 一、单选按钮 在程序中常常使用单选按钮（OptionButton）让用户对一组选项做出唯一的选择，它在工具箱中是一个中央为黑点的圆 。 1、主要属性： ①、Name( 名称 ) 属性：前缀为 OPT； ②、Caption 属性：单选框右侧的标题说明文字； null③、Style属性：单选按钮的类型。 为 0（默认型），则显示成圆中加点状； 为 1，则显示成命令按钮状； ④、Enabled 属性：设置单选按钮是否允许用户选择； 如果为 True则可以选择，如果为 False则按钮暗淡，禁止用户选择。 ⑤、Value属性：表明了选项是否被选中；如果被选中则 Value值为 True。null2、主要事件 Click  事件：选定单选按钮时将触发其  Click  事件。Click() 事件意味着某一选项被用户选中。 编程时要注意的问题： 1、必须在程序初始化阶段（一般放在 form_load( ) 事件中 )，指定每组选项的一个默认值，只要把其中一个选项的 value属性设置成“ True”即可。null2、判断选项的 value值来判断对应选项是否被中，代码形如：       if  option1.value=True then          msgbox " 该项选中 "       else          msgbox " 没选中 "        end if null二、复选框（CheckBox） 复选框是一些开关选项，用于决定程序某个功能的有效与否。 它在工具箱中是一个画有对号的矩形框 。 1、主要属性 ①、Name属性 ( 名称 )：前缀为：CHK。 ②、Caption 属性：显示在选项右侧的标题说明文字。null③、Value属性：用 Value属性获取复选框的状态，它有三个设置值：0、1、2。 0 ——未被选中（vbUnchecked） 1 ——被选中（vbChecked） 2 ——不能被选择（vbGrayed），复选框变灰，选项不可用，禁止用户选择。 null④、Enabled 属性：设置该选项能否被用户选择。 如果为 True则可以选择，为 False则按钮暗淡，禁止用户选择。 ⑤、Visiable属性：设置是否显示该控件。 True——显示对应的控件 False——隐藏对应的控件 2、主要事件 复选框控件主要的事件是鼠标单击 (Click)。如同开关，每按一次，就变换一种状态。null创建一个窗体，并在其上绘制一个文本框，二个框架，三个单选按钮和三个复选框。 null颜色代码： “BBGGRR”——对应六位十六进制数 Private Sub Option1_Click()   TextBox.ForeColor = &HFF&   ‘十六进制常量&Hxx& End Sub Private Sub Option2_Click()   TextBox.ForeColor = &HFF00& End Sub Private Sub Option3_Click()   TextBox.ForeColor = &HFF0000 End SubnullPrivate Sub Check1_Click() If  Check1.Value= vbChecked  Then   TextBox.FontBold = True Else   TextBox.FontBold = False End If End SubnullPrivateSub  Check2_Click() If Check2.Value= vbChecked Then   TextBox.FontItalic = True Else TextBox.FontItalic = False End If End SubnullPrivateSub  cmdQuit_Click()  Unload  Me End Subnull16、关于复选框和单选钮的比较中正确的是（ ） A． 复选框和单选钮都只能在多个选择项中选定一项 B． 复选框和单选钮的值（value）都是（True/False） C． 单选钮和复选框都响应DblClick事件 D． 要使复选框不可用，可设置Enabled属性（False）和value属性(Grayed) null第五节 选择控件——列表框和组合框 Visual Basic 为用户提供了列表框控件（List Box）和组合框控件（Combo Box），都用来向用户提供一个可供选择的列表，以便在程序窗口中实现从多个项目选择的功能。 如果列表框中的项目总数超过了可显示的项目数，系统就自动在列表框控件上添加滚动条。null列表框在工具箱中用 表示，组合框在工具箱中用  表示。 一、常用属性 ①、Name属性 ( 名称 )：前缀分别为：LST,COB。 ②、列属性（Columns）：列表样式。 决定列表框控件是水平还是垂直滚动，以及如何显示列中的项目。 此属性取值如下：null0   垂直滚动的单列列表框 1   水平滚动的单列列表框 >1   水平滚动的多列列表框 ③、列表属性（List）：选项数组，用于设置或者引用列表选项。 列表框和组合框中的所有项目被保存在一个 Lsit（）列表数组中，列表数组是一个字符串数组，数组的每一项都是一列表项目。 A＄=列表框名称.List（下标）null可以改变指定项目的值，格式为： 列表框名称.List（下标）=“字符串” 属性窗口中设置时，按下Ctrl+Enter输入下一项。可以静态设置，也可以动态赋值，还可以用AddItem方法设置。 数组元素 List（0）保存列表框中的第一个项目，List（ListCount － 1）保存列表框中的最后一个项目； ListCount 属性是用来返回列表框中的列表部分项目的个数。null④、索引属性（ListIndex）：用来返回或设置列表框中被选或欲选项目的索引号。 第一个项目的索引号是 0，第二项是 1，依次类推，ListCount  始终比最大的  ListIndex（从 0 开始）值大  1。 返回选中的字符串则用： List( 控件名 .ListIndex) null⑤、TEXT 属性：用于返回用户选定的选项内容。对组合框还可用于设置文本框中显示的内容。 ⑥、多重选择属性（Multiselect）：设置是否能够在列表框控件中进行多重选择以及如何进行多重选择。( 只用于列表框 ) null0——不允许同时选择多个列表项，一次只能选一项，系统默认值 1——允许同时选择多个列表项，单击或按空格键选取或取消某项 2——允许同时选择多个列表项，单击第一项，按 Shift 后单击最后一项，连续选择多个选项；或按 Ctrl 逐一单击，不连续选。null⑦、被选中选项数属性（SelCount）：返回在列表框控件中被选中项目的个数。 如果没有项目被选中，那么  SelCount  属性将返回  0  值 ⑧、选择属性（Selected）：选择属性数组，用来返回或设置在列表框控件中的一个项目的选择状态：TRUE、FALSE；( 只用于列表框 ) 列表框名称 .Selected（索引号）=True或 Falsenull⑨、排列属性（Sorted）：用来指定列表框的项目是否自动按字母表顺序排序。 True——表示列表框中的项目按字母顺序排序； False（缺省值）——表示列表框中的项目不按字母表顺序排序。null⑩、样式属性（Style）：用来指定控件的显示类型和行为。 列表框的样式属性可以设置为两个数值： 0：（符号常量：vbListBoxStandard）；（缺省值）标准的。显示为文本项的列表； 1：（vbListBoxCheckbox）复选框形式。在 ListBox 控件中，每一个文本项的边上都有一个复选框。在 ListBox 中可以选择多项。null组合框有三种样式，由其 Style属性决定。 ０    下拉式组合框（缺省值） １    简单组合框（列表已显示，不可下拉） ２    下拉式列表框（文本框中不允许输入）nullnull二、常用方法 ①、AddItem 方法：用于将项目添加到列表框或组合框控件中。 控件名称 .AddItem    选项名，序号 ②、RemoveItem 方法：从指定的列表框或组合框中删除一个项目。 控件名称 .RemoveItem 序号 序号是必须的，它表示要删除的项目在对象中的位置。null③、Clear 方法：删除列表框或组合框中的所有项目。 三、常用的事件 列表框最经常使用的是：Click（鼠标单击）事件和 DbClick（鼠标双击）事件，单击表示当前选中的项目，双击事件发生就可以读取列表框的 Text 属性了。 null例：组合框与MSGBOX的联合练习。 nullPrivateSub Form_Load()   Combo1.AddItem  “确定"  Combo1.AddItem  “确定、取消"   Combo1.AddItem  “终止、重试e"   Combo1.AddItem  “是、否、取消"  Combo1.AddItem  "是、否"  Combo1.AddItem  “重试、取消"  Combo1.ListIndex = 0null Combo2.AddItem  " 危险 "  Combo2.AddItem  " 询问 "  Combo2.AddItem  " 警告 "  Combo2.AddItem  " 信息 "  Combo2.ListIndex = 0 End Sub ListIndex 属性用来把第一个元素放在选择位置。nullPrivate Sub  Command1_Click()  message= MsgBox("显示" &Combo1.List(Combo1. ListIndex )  & " 和 " & Combo2.List(Combo2. ListIndex),Combo1.ListIndex + (Combo2. ListIndex + 1) * 16," 消息演示 ")    Select  Case message   Case 1   　 MsgBox “ 你按下了确定按钮 "nullCase 2   　 MsgBox “ 你按下了取消按钮 "  Case 3   　 MsgBox “ 你按下了终止按钮 "  Case 4   　 MsgBox “ 你按下了重试按钮 "  Case 5   　 MsgBox “ 你按下了忽略按钮 "  Case 6   　 MsgBox “ 你按下了是按钮 "  Case 7   　 MsgBox “ 你按下了否按钮 "  End Select End Subnull第六节 滚动条 滚动条用于表示连续变化的数量、音量、速度、时间、进度等信息。 滚动条有一个最大值和最小值，用户移动滑块可以在最大值和最小值之间指定一个数值，Visual Basic为用户提供了水平滚动条控件（HScrollBar）和垂直滚动条控件（VScrollBar）。 null一、常用属性 ①、Name属性(名称) 水平滚动条控件的名称前缀Hsb，垂直滚动条控件前缀Vsb。 ②、上界属性（Max）和下界属性（Min） Max属性用于返回或设置当滚动框处于底部或最右位置时，一个滚动条的最大设置值； Min属性用来返回或设置当滚动框处于顶部或最左位置时，一个滚动条的最小设置值。null③、数值属性（Value） Value属性用来返回或设置滚动块当前位置的数值。 ④、大改变属性（LargeChange）和小改变属性（SmallChange） LargeChange属性用来设置用户单击滚动块和滚动箭头之间的区域时，滚动条控件的 Value 属性值的改变量。 SmallChange属性用来设置用户单击滚动箭头时，滚动条控件的 Value 属性值的改变量。 null二、常用事件 ①、Change事件 在使用鼠标单击滚动条两头的滚动箭头时或拖动滑块后松开鼠标时发生的，还可以在程序中通过代码改变 Value 属性的设置时激活此事件。 ②、Scroll事件 当滚动条控件上的滑块被鼠标拖动时发生Scroll事件，而在松开鼠标时激活Change事件。 null例:用滚动条改变颜色属性值。 程序的运行时，移动红色、绿色、蓝色水平滚动条可以改变窗口上部图片框的颜色。 所有的颜色都是由三种基本颜色（三原色）：红色、绿色和蓝色按一定的比例合成的，WINDOWS中生成就利用这个特点生成各种颜色的，共有三种方法： ①、语法：QBColor(color) QBColor函数返回一个Long，用来表示所对应颜色值的RGB颜色码。color参数是一个界于0到15的整型。 nullcolor参数有以下对应关系： 0 黑色 8 灰色 1 兰色 9 亮兰色 2 绿色 10 亮绿色 3 青色 11 亮青色 4 红色 12 亮红色 5 洋红色 13 亮洋红色 6 黄色 14 亮黄色 7 白色 15 亮白色 如：text1.forecolor=QBCOLOR（4)null②、常量法（符号常量法） 颜色 符号常量 数值 黑色 VBBlack 0或H0 红色 VBRed 255或HFF 绿色 VBGreen 65280或HFF00 黄色 VBYellow 65535 蓝色 VBBlue 16711680或HFF0000 洋红 VBMagenta 16711935 青色 VBCyan 16776960 白色 VBWhite 16777215 如：text1.forecolor=VBrednull③、RGB合成法 RGB合成法可以合成各种各种的颜色。 使用语法： RGB(red, green, blue) red、green和blue参数的数值范围是从 0 到 255，各自表示颜色中的红色成份、绿色成分和蓝色成分。 null按要求绘出一个图片框、三个表示颜色的水平滚动条和一个表示图片大小的垂直滚动条，三个用于显示相应滚动条的数值的标签，它们的名称分别是：Lblred、Lblgreen、Lblblue。 nullPrivate Sub Form_Load() lblred.Caption = Hsbred.Value lblgreen.Caption = Hsbgreen.Value lblblue.Caption = Hsbblue.Value End Sub nullPrivate Sub Hsbred_change() Picture1.BackColor = RGB(Hsbred.Value, Hsbgreen.Value, Hsbblue.Value) Lblred.Caption = Hsbred.Value End Sub Private Sub Hsbgreen_change() Picture1.BackColor = RGB(Hsbred.Value, Hsbgreen.Value, Hsbblue.Value) lblgreen.Caption = Hsbgreen.Value End Sub nullPrivate Sub Hsbblue_change() Picture1.BackColor = RGB(Hsbred.Value, Hsbgreen.Value, Hsbblue.Value) Lblblue.Caption = Hsbblue.Value End Sub null第七节 计时器 计时器控件是能有规律地以一定的时间间隔触发计时器事件而执行相应事件代码的控件。 一、主要属性 ①、Name( 名称 ) 属性：前缀 TMR ②、激活属性（Enable）: 用于决定是否打开计时器控件。 Enable可以设置为 True和 False，设置为 True时相当于计时器控件打开，并时刻进行倒计时操作，设置为 False时计时器控件关闭。null③、间隔属性（Interval） 用于返回或设置对计时器控件的倒计时的毫秒数(即：定时器触发的周期)。（或者步长、间隙） 使用语法是：Timer.Interval = milliseconds 将它设置为 0（缺省值）则 Timer  控件无效； null二、主要事件—— Timer () 事件 当一个计时器控件经过预定的时间间隔（即 Interval 属性的设置值）时，将激发计时器的 Timer1_Timer () 事件。 例：演示一个数字时钟显示系统时间； 一个标签，一个计时器控件。 时间显示在标签上。 nullPrivate Sub Form_Load ()  Timer1.Interval = 1000 End  Sub Private Sub Timer1_Timer ()  Label1.Caption = Time End  Subnull例：秒表的计时功能：nullDim  st  As Single Private Sub Form_Load()   Timer1.Interval = 10   Timer1.Enabled = False End Sub Private Sub Command1_Click() ——（开始按钮）   Timer1.Enabled = True   st = Timer End SubnullPrivate Sub Command2_Click() ——（停止按钮）   Timer1.Enabled = False End Sub Private Sub Timer1_Timer()   Text1.Text = Round((Timer - st) * 100) / 100 End Subnull第八节 框架 框架是一个带有标题的长方形框，它用来把其它控件分成可标志的控件组。在工具箱中，框架控件是一个标有 XY 的长方形框 。 一、主要属性 ①、Name( 名称 ) 属性：前缀为 FRA； ②、Caption 属性：框架的标题由其 Caption 属性决定 null③、Appearance属性：框架控件有平面外观和立体外观两种形式，其外观属性（Appearance）可以设置框架是 3D 立体效果还是平面外观。 ④、Enabled 属性：可以设定该框架中的对象能否被用户操作；如果为 True则可以操作，如果为 False则整个框架中的对象不能被操作，禁止用户操作选择，屏蔽了框架中的所有对象。 框架一方面用于控件的分组（美观），另一方面使用其容器特性。null二、主要事件 一般情况下不需要框架本身响应什么事件，主要的是框架中的控件响应事件就可以了，当然也有其相应的事件。null第九节 焦点与Tab顺序 一、焦点 焦点是对象接受用户鼠标或键盘操作的能力。当对象具有焦点时，才可接受用户的操作。 使对象拥有焦点的方法： ①、运行时选择对象。 ②、运行时用快捷键选择对象。 ③、在代码中使用SetFocus方法。 ④、按下Tab键，使焦点在不同对象间不断转移。null二、与焦点有关的属性 1、Tabindex属性：用来设置对象的Tab键顺序。 即：焦点转移的顺序。 在默认情况下，第一个被安放的控件的 Tabindex属性的值为0；第二个被安放的控件的 Tabindex属性的值为1；以此类推。 在程序运行时，焦点默认位于 Tabindex取值最小的控件上。 当按Tab键时，焦点按对象的 Tabindex属性的值顺序切换。null2、TabStop属性：是决定用户是否可以使用Tab将来使对象具有焦点。 值为True :可以使用 值为False :不可以使用 三、与焦点有关的事件 GotFocus事件：在对象得到焦点时发生。 LostFocus事件：在对象失去焦点时发生。null11.可以接受焦点的控件是 。 A）Frame B）Command C）Label D）Timernull12.下列关于图片框的语句中错误的是 。 A）Picture1.Picture=Picture2.Picture B）Picture1.Picture=LoadPicture("C:＼vb60＼Arw04Up.ico") C）Picture1.Print Tab(20); CurrentX, CurrentY D）Picture1.Stretch=Truenull13、给程序的空白行选择适当的语句。 窗体上有一个命令按钮Command2和一个列表框List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下： Private Sub Command2_Click（）。 Dim Ind As Integer Ind= List1.Remove Ind End Sub A）List1.Index B）List1.ListIndex C）List1.Text D）List1.ListCountnull14.关于Image控件和PictureBox控件的说明，其中错误的是 。 A）Image控件和PictureBox控件都有Picture属性 B）Image控件和PictureBox控件都支持Print方法 C）Image控件和PictureBox控件都可以用LoadPicture函数把图形文件装入控件中 D)Image控件和PictureBox控件都能在属性窗口装入图形文件，也都能在运行期间装入图形文件 15.许多常用控件都有Value属性，Value属性的作用是 。 A）确定控件的属性 B）确定控件的位置 C）确定控件的状态和位置 D）确定控件的状态、内容及位置null16.窗体上有一个列表框和一个文本框，编写如下两个事件过程： Private Sub Form_Load() List1.AddItem "Beijing" List1.AddItem "Tianjin" List1.AddItem "Shanghai" Text1.Text="" End Sub Private Sub List1_Click() x=List1.Text Print x+Text1.Text End Sub 程序运行后，在文本框中输入“China”，然后单击列表框中的“Shanghai”，则输出结果为 。 A）China Beijing B）China Tianjin C）China Shanghai D）Shanghai Chinanull17.为了暂时关闭计时器，应把该计时器控件的 属性设置为False。 A）Visible B）Timer C）Enabled D）Interval 18.下列各控件不包含有滚动条的控件是 。 A）ListBox B）ComboBox C）TextBox D）LabelBox null19.下列每组控件中，都包含有滚动条的一组控件是 。 A）ListBox和LabelBox B）TextBox和DriveListBox C）ComboBox和CheckBox D）FileListBox和DirListBoxnull20.给程序的空白行选择适当的语句。 程序段的功能是：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。程序如下： Do While List2.ListCount List2.RemoveItem 0 Loop A）List1.AddItem List2.List(0) B）List1.AddItem List2.Text C）List2.AddItem List1.List(0) D）List2.AddItem List1.Text