vb6-常用控件知识讲解
VB6 中几个 ActiveX 控件的帮助文档
boItems("Img1").Image = 1 '设置指向的图象索引号
Private SubForm_Load()
mima=InputBox("请输入密码:", "密码框") '设置一个口令检查框
Do Whilemima<> ""
StatusBar1.Panels(1).Text = "呕倒!密码都不会"
tishi=MsgBox("密码不正确!请重新输入",vbExclamation+vbOKOnly, "检查密码")
等控件通过设置Icons,SmallIcons,ImageList属性=ImageList控件 来绑定使用这些图片.
也可以在过程代码中,用 Index 属性或 Key 件→属性→Image图象→Insert Picture插入图片→双击加入5个图片后确定
Private Sub Tabstrip1_click()
Select Case TabStrip1.SelectedItem.Key '返回关键字
Case "tab1" '比较对应的关键字运行下面语句
If ProgressBar1.Value < 100 Then '进度条当前值
ProgressBar1.Value = ProgressBar1.Value + 5
Min，Max 属性 '决定滑块最左右端或最上下端所代表的值
LargeChange属性 '上下方区域单击时改变的值
vb6 datagridview控件用法
一、VB6简介Visual Basic 6.0（VB6）是微软公司于1998年推出的一款集成开发环境（IDE），是一种基于事件驱动的第三代事件驱动语言。
它允许开发者以快速、简单的方式创建Windows应用程序。
VB6具有可视化编程的特点，允许开发者以拖拽控件的方式构建界面，极大地提高了开发效率。
二、DataGridView控件概述DataGridView控件是VB6中用于显示和编辑数据的控件，它提供了功能强大的数据表格展示能力，可以实现类似Excel表格的功能。
它是VB6中用于数据展示的重要控件之一，具有灵活性高、界面友好等特点。
三、DataGridView控件的基本用法使用DataGridView控件展示数据一般需要以下步骤：1. 在VB6的工具箱中找到DataGridView控件，将其拖拽到窗体中。
2. 设置数据源：可以通过ADODB连接数据库，或者手动添加数据到DataGridView中。
3. 配置列：可以设置每一列的名称、宽度、颜色等属性。
4. 对DataGridView进行一些基本的样式调整，比如添加边框、更换背景颜色等。
四、DataGridView控件的高级用法除了基本的展示功能外，DataGridView控件还支持一些高级用法，比如：1. 数据编辑：可以在DataGridView中实现对数据的增删改操作，通过单元格的编辑功能实现数据的实时更新。
2. 数据筛选：可以根据条件对数据进行筛选，实现灵活的数据展示。
3. 数据导出：可以将DataGridView中的数据导出为Excel表格或者其他格式的文件。
4. 事件处理：可以通过DataGridView的事件来监听用户的操作，比如单元格的点击、双击等操作。
五、DataGridView控件的注意事项在使用DataGridView控件时需要注意一些问题，比如：1. 对数据源的操作需要小心，避免出现数据同步问题。
2. 对于大量数据的展示，需要注意性能优化，避免出现卡顿现象。
vb6-常用控件
Check2 Option1 Option2
5.2 滚动条和Slider控件
Slider控件
n
Value Max
Min
Max SmallChange LargeChange
共同具有的重要属性: Max：最大值 -32 758~32 757 Min：最小值 -32 758~32 757 SmallChange 最小变动值，单击箭 头时移动的增量值。 LargeChange 最大变动值，单击空 白处时移动的增量值。 Value 滑块所处位置所代表的值。
文本框的换行输出: Private Sub Command1_Click() For i = 1 To 100 step 2 text1 =text1+format(str(i),”@@@”) Sum = Sum + i N=n+1 If n mod 5=0 then text1=text1+vbcrlf Next i Text2= Sum End Sub
If d = 0 Then X1 = p : X2 = p If d < 0 Then q = Sqr(-d) / (2 * a) p = CInt(p * 100) / 100 q= CInt(q * 100) / 100 X1 = p& "+" & q & "I " X2 = p & "-" & q & "I" endif Text4.Text = X1 Text5.Text = X2 endsub
滚动条的事件：
1.Scroll： 拖动滑块时会触发Scroll事件。 2.Change： Value属性改变时触发Change事件。 例1. 用一个文本框(txtSpeed)显示 滚动条(hsbSpeed)滑块当前位置所 代表的值。
学习VB 6.0 的一些常用控件.
学习VB 6.0 的一些常用控件文本框TEXTBOX的使用文本框控件（TextBox)是VB中最常用的控件。
它是显示和输入文本的容器，相当于一个文字编辑器，提供了所有基本的文字处理功能，例如文本的编辑等。
在下面这个小程序中，我们能看到文本框控件（TextBox)的最基本的属性。
为了学习方便，提供的源码已经作了详细的中文注释，看看源码框中的代码Option Explicit'--------------------------------------' TextBox的常用属性的例子'--------------------------------------' 洪恩在线求知无限'--------------------------------------'------名称-------------作用------------' CmdClear 清除文本框内容按钮' TextAll 文本框' CmdOK 给窗体FormBack的TextAll文本框赋值' FormTextBox 主窗体'--------------------------------------'--------------------------------------'――――文本框名称――――属性设置―――'' TextPassWord PassWordChar为*' TextResume Multiline为Ture, ScrollBars为2 -Vertical' TextAll Multiline为Ture, ScrollBars为2 -Vertical' Appearance为0 - Flat'--------------------------------------Private Sub CmdClear_Click()'清除所有文本框中的内容TextID.Text = ""TextPassWord.Text = ""TextName.Text = ""TextMail.Text = ""TextResume.Text = ""End SubPrivate Sub CmdOK_Click()'把FormTextBox文本框的Text及标签的Caption赋给'窗体FormBack中TextAll文本框的Text属性FormBack.TextAll.Text = LblID.Caption & " " & TextID.Text _& vbNewLine & _LblPassWord.Caption & " " & TextPassWord.Text _& vbNewLine & _LblName.Caption & " " & TextName.Text _& vbNewLine & _LblMail.Caption & " " & TextMail.Text _& vbNewLine & _LblResume.Caption & " " _& vbNewLine & TextResume.Text'其中vbNewline是使TextAll.Text换行显示Load FormBack '载入窗体FormbackFormBack.Show '显示窗体FormbackFormTxtBox.Visible = False '设置窗体FormtextBox不可见End Sub这个例子的两个窗体界面如下：主窗体（FormTxtBox）窗体（FormBack）我们首先新建一个标准的EXE工程。
VB6.0基本控件的属性教学总结
VB6.0基本控件的属性教学总结VB基本控件的属性，方法经及事件VB基本控件的属性，方法经及事件VB基本控件的属性，方法经及事件所有控件都具有的属性：1、Name: 表示在代码中用来标识一个控件的名字。
2、Enabled: 表示一个控件是否可以响应一个事件，即该控件可不可用。
值为true: 可以响应；值为false: 不可以看见。
3、Visible: 表示一个控件是否可见。
值为true:可以看见；值为false: 不可以看见。
所有控件都有具有的事件：1、KeyDown : 当用户按下键盘上一个键时发生的。
2、KeyUp : 在用户松开键盘上按下的键时发生的。
3、KeyPress : 在Key Down和Key Up事件之间发生。
4、MouseDown : 在鼠标被按下时触发的。
5、MouseUp ：在用户松开鼠标键时发生的。
6、Click ：在用户单击鼠标左键时发生的。
7、DblClick ：在用户双击鼠标时发生的。
一、窗体（Form）属性：1、Caption: 表示窗体标题栏的文字。
2、BorderStyle: 一般情况下为默认值，若更改为下列值：1）值为0：没有窗体标题栏2）值为1：窗体运行之后不能改变大小3、WindowState: 设置窗体的大小。
3）值为0：窗体正常大小4）值为1：窗体最小化值为2：窗体最大化4、BackColor: 表示窗体的背景颜色事件：1、Initialize（初始化事件）: 在窗体加载和显示之前触发，这个事件只触一次。
2、Load（加载事件）: 用来完成窗体显示之前需要完成的动作。
3、Activate/Deactivate (激活/非激活事件)：是用户在同一个应用程序的两个或多个窗体之间移动时触发的。
4、QueryUnload（条件卸载事件）: 决定窗体是如何关闭的。
触发QueryUnload事件时Unload 的参数和因素有：1）VbFormControlMenu值为0 ：选中窗体控件菜单中的Close 命令。
VB 6.0 讲义(第二章 窗体与基本控件)
第二讲窗体与基本控件一. 控件的基本属性:名称属性：所有对象皆具有的属性，即所创建对象的名称。
对象名称是作为对象的唯一的标识在程序中被引用，不会在窗体中显示。
2.Caption标题属性：控件上所显示内容3.Enable:用于决定控件是否可操作。
Enable：允许操作并对操作响应；False：是不可操作,便灰。
4.Visible:用于决定控件是否可见.Enable：可见；False：是不可见。
5.Height、Width、 Left、Right属性：Height、Width设置控件高度和宽度；Left、Right设置对象在屏幕上的位置，分别表示在容器（如窗体）内的相对容器坐标系统的位置.6.Font属性：改变文本外观FontName字符型，决定字体；FontSize整型，决定大小；FontBold逻辑型，粗体；FontItalic逻辑型，斜体；FontsTrikethru逻辑型，删除线；FontUnderline逻辑型，下划线。
7.BackColor和ForeColor:设置对象的前景色和背景色.(前景色要在显示内容时才可见)8.BorderStyle:设置对象的边界类型, 0－无边框、1－有边框。
9.Backstyle背景样式：0－透明；1－不透明。
10.Alinement对齐：左、中、右。
11.Autosize自动调整大小：12.TabIndex属性：决定按Tab键时，焦点在控件间移动的顺序。
焦点：接受用户鼠标或键盘输入的能力。
对象具有焦点时才能输入。
（Frame、Label 控件不能接受焦点）默认属性：反映某个控件最重要的属性。
可省略（建议不）。
Text1.text=‖333‖等价于 Text1=‖333‖二. 窗体1.属性窗体的属性影响窗体的外观及行为的特征(如:AutoRedraw属性).◆Appreance:设置窗体表面的显示方式.(0-平面;1-立体)◆AutoRedraw:设置窗体图像的重建.(Ture-自动重画曾被覆盖部分;False-不重画)◆BorderStyle:（）设置窗体的边界,将影响标题栏有关按钮及状态.(有0~5种设置，区别于基本属性)◆ClipControls:设置窗体重建时是只画新露出部分还是全部重画.◆ControlBox:设置左上角是否放置控制框.(为Ture时,可按Alt+F4键关闭窗体,点击图标会出现控制菜单)◆ScaleWidth、ScaleHeight:ScaleWidth、ScaleHeight表示了窗体可容下的实体尺寸(几何尺寸不变,比例尺变), Height、Width表示窗体的实际几何尺寸(比例尺不变,几何尺寸随属性值改变).◆Picture:用来装入一幅图片.◆ScaleLeft、ScaleRight:设置窗体的坐标系统(左上角-原点位置).◆Windows State:设置窗口的三种状态（Max=2、Min=1、Normal=0）◆KeyPreview:决定是窗体还是焦点(Tab键可在对象间移动焦点)控件响应键盘事件.(Ture—都响应;False—焦点控件响应)2.普通窗体的生命周期:Noties:是否有鼠标、键盘事件及启动、关闭时的事件可通过添加一些语句到相应的事件引发过程中来跟踪。
vb6知识点总结
vb6知识点总结VB6（Visual Basic 6）是一种事件驱动的编程语言，它是微软公司推出的一种基于组件对象模型（COM）的编程语言。
VB6广泛应用于Windows操作系统下的软件开发，特别是在企业级应用程序和数据库开发中得到了广泛的应用。
在本文中，我们将总结VB6中的一些重要知识点，包括语法结构、控件、数据库操作等方面的知识，并对其进行详细的介绍。
一、VB6的基本语法结构1. 变量与常量VB6中的变量可以分为两种类型：基本变量和对象变量。
基本变量包括整型、长整型、单精度浮点型、双精度浮点型、字符串型等；对象变量则用来引用COM组件。
在VB6中，变量名必须以字母开头，可以包含字母、数字和下划线，不区分大小写。
常量是其值不会改变的变量，使用Const关键字定义。
2. 运算符VB6中支持常见的数学运算符（+、-、*、/）以及比较运算符（<、>、=、<>）和逻辑运算符（And、Or、Not）。
3. 过程与函数VB6中的过程包括Sub过程和Function过程。
Sub过程用于执行一组语句而不返回值，而Function过程则执行一组语句并返回一个值。
4. 控制结构VB6中的控制结构包括条件语句（If... Then... Else）、循环语句（Do... Loop、For... Next）、选择语句（Select Case）等。
5. 数组VB6中的数组可以包含多个相同类型的变量，数组的索引从0开始。
6. 错误处理VB6中的错误处理使用On Error语句来捕捉程序中的错误，并使用Err对象来获取错误信息。
7. 编程风格VB6支持基于事件的编程风格，通过声明事件响应程序（Event Handler）来响应用户交互。
二、VB6中的控件VB6中的窗体是用户界面的基本元素，可以包含各种视觉控件，并响应用户的操作。
2. 常用控件VB6中的常用控件包括文本框（TextBox）、标签（Label）、按钮（CommandButton）、列表框（ListBox）、组合框（ComboBox）、复选框（CheckBox）、单选按钮（OptionButton）等。
vb6.0图形控件和图形方法
➢ 图片框控件的Aling属性值为1，则图片框贴紧 到窗体的上边；Align属性值为2，则图片框贴 紧到窗体的下边。
阶段2 图片框控件常用方法
一.Print方法
图片框可以用来显示Print方法输出的文本，格式如下： 图片框控件名称.Print输出表
本章导读
VB6.0具有丰富的图形图像处理能力，它提供 了一系列基本的图形函数、语句和方法，支 持直接在窗体或控件上产生图形、图像并对 之加以处理。本章将介绍VB所提供的图形控 件和图形方法。
任务1 VB坐标系
阶段1 容器坐标系 阶段2 改变容器坐标系的
Scale方法 阶段3 坐标刻度
阶段1 容器坐标系
任务2 图片框控件
阶段1 图片框控件常用属性 阶段2 图片框控件常用方法
阶段1 图片框控件常用属性
一.Picture 属性（字符串类型）
⑴ 设计时选取：在界面设计时，选中该图片框控件属性 窗口中该属性，在弹出的Load_Picture对话框中选择所 要显示的图片文件，相应的图片随之被加载到图片框中。 ⑵ 运行时装入：程序运行时，可用LoadPicture函数装 入图片到图片框控件中。
ScaleWidth属性：该属性值为容器自身的宽度值。 ScaleHeight属性：该属性值为容器自身的高度值。 CurrentX、CurrentY属性：分别表示当前点在容器内
的横坐标、纵坐标。
阶段2 改变容器坐标系的Scale方法
➢容器坐标系中，坐标系刻度单位的默认值为 “缇”（1缇≈0.01764毫米），容器的最小坐 标值为左上角坐标，容器的最大坐标值为右下 角坐标。 ➢利用Scale方法可以改变原点的坐标并随之改 变最大坐标值。 格式：容器名.Scale (x1,y1)-(x2,y2)
VB6(控件)：标准控件的使用详述(上)
4.1 概述ADO Data 控件使用Microsoft ActiveX 数据对象(ADO) 来快速建立数据绑定的控件和数据提供者之间的连接。
Visual Basic以前的版本提供了内在的Data 控件和Remote Data 控件(RDC) 来进行数据访问。
这两种控件仍包括在Visual Basic 中，以提供向后兼容。
不过，因为ADO 的适应性更广，因此建议用户使用ADO Data 控件来创建新的数据库应用程序。
请注意，这种控件是一种相当“昂贵”的创建连接的方法，在第一个控件至少有两个连接，且以后的每个控件至少多一个连接时使用。
可能的用法：连接一个本地数据库或远程数据库。
打开一个指定的数据库表，或定义一个基于结构化查询语言(SQL) 的查询、或存储过程、或该数据库中的表的视图的记录集合。
将数据字段的数值传递给数据绑定的控件，可以在这些控件中显示或更改这些数值。
添加新的记录，或根据对显示在绑定的控件中的数据的任何更改来更新一个数据库。
∙ 4.2 用法∙如果该控件不在“工具箱”中，请按CTRL+T 键，显示“部件”对话框。
在这个“部件”对话框中，单击“Microsoft ADO Data Co ntrol”。
∙在“属性”窗口中，单击“ConnectionString”显示“ConnectionString”对话框。
如果您已经创建了一个Microsoft 数据链接文件（D ata Link file）(.UDL)，请选择“使用OLE DB 文件”并单击“浏览”，以找到计算机上的文件。
如果使用DSN，则单击“使用OD BC 数据源名”，并从框中选择一个DSN，或单击“新建”创建一个。
如果想创建一个连接字符串，请选择“使用ConnectionString”，单击“生成”，然后使用“数据链接属性”对话框创建一个连接字符串。
在创建连接字符串后，单击“确定”。
∙在“属性”窗口中，将“记录源”属性设置为一个SQL 语句。
VB6.0第四章-控件,窗体
7
可视化程序设计——第四章 常用控件和窗体
4.4 列表框
7.Text属性（默认属性）
.List（.ListIndex）＝ .Text
8.MultiSelect属性
None：不允许多选。 Simple：简单多选。每次鼠标单击选中一项。 Extended：可扩展多选，与键盘上的某个键配合使用， 如：ctrl+鼠标。
属性：
Path Pattern Archive Normal System Hidden ReadOnly 设置目录或返回当前工作目录 设置要显示的文件类型 是否显示归档文件 是否显示普通文件 是否显示系统文件 是否显示隐含文件 是否显示只读文件 File1.Path=Dir1.Path File1.Pattern=“*.EXE ; *.DLL”
属性：Drive—设置驱动器或返回当前工作驱动器
可通过语句 Drive1.Drive=“C:\” 指定，或从列表中选择。
Drive属性只能在程序代码中设置、访问， 而不能在属性窗口中设置。
事件：Click、Change（列表框顶部的内容改变）
21
可视化程序设计——第四章 常用控件和窗体
DirListBox控件
4.6 驱动器、目录和文件列表框
三、文件列表框
Name 属性：fil [对象.]Path[＝Pathname] [对象.]Pattern[＝value] [对象.] FileName [＝pathname] Path和FileName
19
可视化程序设计——第四章 常用控件和窗体
DriveListBox控件
16
可视化程序设计——第四章 常用控件和窗体
vb6-常用控件
代码设计 方法二： (计算一元二次方程的根）
Private Sub Command1_Click() a = Val(Text1) b = Val(Text2) c = Val(Text3) d=b*b-4*a*c p = -b / (2 * a)
接下页：
If d >= 0 Then
If d > 0 Then
Value 滑块所处位置所代表的值。
滚动条的事件：
1.Scroll： 拖动滑块时会触发Scroll事件。
2.Change： Value属性改变时触发Change事件。
例1. 用一个文本框(txtSpeed)显示 滚动条(hsbSpeed)滑块当前位置所 代表的值。
Sub hsbSpeed_Change() Text1.Text = HScroll1.Value
Text1.FontItalic = True Else Text1.FontItalic = False End If End Sub
检查框与单选按钮Value 属性的比较
单选钮
检查框
True: 单选钮被选定 False: 单选钮未被选定
0--Unchecked：未被选 定
1--Checked：选定
S = (a + b + c) / 2
Area = Sqr(S * (S - a) * (S - b) * (S - c))
Text4.Text = Area
End Sub
界面设计(计算一元二次方程b Command1_Click() a = Val(Text1) b = Val(Text2) c = Val(Text3) d=b*b-4*a*c p = -b / (2 * a)
VB常用控件的方法详解
VB常用控件的方法详解1.按钮控件（Button）：- Click事件：当用户单击按钮时触发的事件。
- Text属性：按钮上显示的文本。
- Enabled属性：是否启用按钮。
- Visible属性：按钮是否可见。
- BackColor属性：按钮的背景颜色。
- ForeColor属性：按钮的前景颜色。
2.文本框控件（TextBox）：- Text属性：文本框中显示的文本内容。
- ReadOnly属性：文本框是否为只读状态。
- PasswordChar属性：设置密码框中字符显示的方式。
- MaxLength属性：文本框最大可输入的字符数限制。
4.列表框控件（ListBox）：- Items属性：列表框中的项，可以通过Items属性进行添加、删除、修改操作。
- SelectedIndex属性：获取或设置当前选择项的索引。
- SelectedItem属性：获取或设置当前选择项的文本值。
- Items属性：组合框中的选项，可以通过Items属性进行添加、删除、修改操作。
- SelectedIndex属性：获取或设置当前选择项的索引。
- SelectedItem属性：获取或设置当前选择项的文本值。
6.复选框控件（CheckBox）：- Checked属性：表示复选框是否被选中。
- Text属性：复选框显示的文本。
7.单选按钮控件（RadioButton）：- Checked属性：表示单选按钮是否被选中。
- Text属性：单选按钮显示的文本。
8.图像框控件（PictureBox）：- Image属性：设置图像框中显示的图像。
- SizeMode属性：设置图像显示的方式（自适应、拉伸等）。
9.进度条控件（ProgressBar）：- Value属性：设置或获取进度条的当前值。
- Maximum属性：设置进度条的最大值。
- Minimum属性：设置进度条的最小值。
10.日期选择框控件（DateTimePicker）：- Value属性：设置或获取选择的日期时间值。
第五章vb6.0 基本控件的使用
第五章基本控件的使用5.1 标签控件在Windows应用程序的各种对话框中，都显示有一些文本提示信息，在VB中可以使用标签控件来实现在窗体中显示这些文本提示信息。
表5.1中列出了标签控件的一些主要属性。
既可以在程序设计阶段通过【属性】窗口设置标签的属性，也可以在程序运行阶段在代码中设置窗体的属性。
如将标签（名称为Labell）显示的文本设置为"欢迎"的语句如下：Labell.Caption=欢迎实例5.1标签的使用在该程序中，窗体上显示一行提示用户执行操作的文本，当用户单击或双击窗体时，窗体上还会显示出用户所执行的操作。
在窗体上放置两个标签控件，它们的属性设置如表5.2所示。
打开【代码】窗口，将下列代码添加到Form_Click事件过程中：（BorderStyle属性的值为0）,第二行语句是设置标签上显示的文本。
窗体上显示"您双击了窗体！",并且文本有一个边框，如图5.3所示：5.2 按钮控件在应用程序中，按钮控件常常被用来启动、中断或结束一个进程，用户可以通过简单的单击按钮来执行操作。
只要用户单击按钮，就会触发它的Click事件过程，通过编写按钮的Click 事件过程，就可以指定它的功能了。
按钮控件的常用属性如表5.3所示。
5.2.1按钮的有效性在某些应用程序界面中，按钮会根据用户的操作情况呈现两种不同的状态，一种是"有效",一种是"无效".在"无效"状态时，按钮通常以浅灰色显示，不能响应用户的任何操作。
Windows系统自带的录音机程序界面，其中的【停止】与【后退】按钮无效（以浅灰色显示）.按下【播放】按钮后，【播放】按钮变为无效，而【停止】按钮变为有效。
按下【停止】按钮后，【停止】按钮变为无效，【播放】按钮恢复有效。
通过按钮的有效性可以看出当前程序的状态，从而避免一些不需要的或重复的操作。
如在录音机处于停止状态时（【停止】按钮无效）,用户就不需要再去单击【停止】按钮来停止播放了。
VB6.0基础教程 之 第6章 Visual Basic常用标准控件
6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 6.9
Basic常用标准控件 Visual Basic常用标准控件
概述 图形控件 单选按钮和复焦点与Tab Tab顺序 焦点与Tab顺序
1
6.2 图形控件
图片框(PictureBox)和图像框(Image) 功能：用于显示图形 Picture属性:设置图片框或图像框中要显示的图像文件名。可以在设计阶段设置 或在程序中设置。 LoadPicture函数一般格式： [对象.]Picture= LoadPicture(“文件名”)
复选框
2．复选框(CheckBox) Caption属性：文本标题。 Alignment属性 0：控件钮在左边，标题显示在右边。 1：控件钮在右边，标题显示在左边。 Value属性 0--Unchecked：未被选定 1--Checked：选定 2--Grayed：灰色，禁止选择 Style属性 0--Standard：标准方式 1--Graphical：图形方式 事件 Click
6.4 框架
用途：将窗体中的控件按功能或类别分组。
框架
6.4 框架
Caption属性：框架标题 Enabled属性 False，不允许对框架内的对象进行操作。 Visible属性 True：框架及其控件可见。 False：框架及其控件被隐含起来。 事件 Click、DblClick 一般不需要编写框架的事件过程。
例如：Dir1.Path=“C:\Mydir” 重要事件——Change事件 在程序运行时，每当改变当前目录，即目录列表框的Path属性发生变化时，都要触 发其Change事件。
文件列表框(FileListBox)
功能：显示当前目录中指定类型的所有文件。 Path属性：用于返回和设置当前目录。 要从文件列表框（File1）中获得全路径的文件名Fname，用下面的程序代码： If Right(file1.path,1) ="\" Else Fname=file1.path &"\"& file1.filename End If Then Fname=file1.path & file1.filename
VB常用控件介绍
VB常用控件介绍VB(Virtual Basic)是一种面向对象的编程语言，常用于开发各种图形用户界面(GUI)应用程序。
在VB中，控件是构成用户界面的基本元素，通过控件可以实现用户与程序的交互。
下面是一些常用的VB控件的介绍。
1. 按钮控件(Button)：按钮是VB中最常用的控件之一，用于触发一些事件或执行一些动作。
通过设置按钮的文字、大小、位置和事件处理程序，可以实现各种用户交互功能。
3. 文本框控件(TextBox)：文本框用于接收用户的输入，并可以将输入的文本保存到变量中。
可以设置文本框的大小、位置、边框样式等属性，并可以通过事件处理程序响应用户输入的变化。
4. 列表框控件(ListBox)：列表框用于显示一组选项，并允许用户从中选择一个或多个选项。
可以通过添加和移除选项，以及设置列表框的大小、位置、滚动条等属性来定制列表框的外观和功能。
6. 复选框控件(CheckBox)：复选框用于表示一个状态，可以被选中或取消选中。
常用于表示一个二进制选项，比如启用/禁用一些功能。
可以设置复选框的大小、位置、文本等属性，并可以通过事件处理程序获取用户的选择。
7. 单选按钮控件(RadioButton)：单选按钮用于表示一组互斥的选项，用户只能选择其中的一个。
常用于表示一个多项选择，比如选择性别。
可以设置单选按钮的大小、位置、文本等属性，并可以通过事件处理程序获取用户的选择。
8. 进度条控件(ProgressBar)：进度条用于显示任务的进度，可以根据任务的完成情况来改变进度条的长度和显示。
可以通过设置进度条的最小值、最大值、当前值等属性，以及处理进度改变的事件来定制进度条的功能。
9. 图像框控件(PictureBox)：图像框用于显示图像或图表，可以加载本地或网络上的图像文件，并可以设置图像框的大小、位置等属性。
可以通过处理鼠标点击、鼠标移动等事件来实现与图像相关的交互功能。
10. 文件对话框控件(FileDialog)：文件对话框用于让用户选择文件或保存文件，可以通过设置对话框的类型、过滤条件、默认目录等属性来限制用户的选择范围，并可以通过事件处理程序获取用户选择的文件路径。
vb6.0 控件简介
阶段2 菜单栏中的“格式”的应用
在界面设计前，应该对各个控件的布局有一个
整体的考虑，使界面看上去自然、清晰，层次分 明。在各控件建立后，还可以利用菜单栏中的 “格式”对它们统一布局。
再选择“格式”菜单中的“对齐”、“统一尺 寸”、“间距”等项进行设置。
阶段3 控件的属性窗口
每个控件都有自己的属性、方法和事件。某些
二.Autosize属性（逻辑类型）
该属性决定控件是否自动改变大小，以显示其 全部内容。当字符串Caption的字符数超过设 定的字符串Caption的宽度时： 若Autosize属性值为True，则自动改变控件大 小以显示全部内容。 若Autosize属性值为False，则保持控件大小 不变，超出部分不予显示。
提高程序的可读性，可以考虑根据控件在程序中的实际 作用，为其另取一个合适的名称。
二.Caption属性（字符串类型）
控件的Caption属性值为显示在控件上的标题，运行时 用户在界面上看到的是Caption值。 不是所有的控件都有Caption属性，如文本框、驱动器 、目录、文件列表框、图像或图片框、定时器、滚动 条、组合框、数据库等控件。 “Caption”属性的默认值与控件的“名称属性”同名 。 重新设置控件的Caption属性，变化的只是控件的外观 ；而重新设置控件的名称属性则不然。
三.Enabled属性（可用性，逻辑类型）
该属性只能取值为“False”或“True”。当值
为False时控件不可用，为灰色；当值为True时 控件可用。 Enabled属性可以在设计时设置，也可以在运 行时用赋值语句为其赋值。
四.命令按钮的其他属性
Appearance属性 Backolor属性 Cancel属性 Default属性 Font属性 Left、Top、Height、Width属性 Style、Picture属性 Visible属性 Index属性
第4章 VB 6.0常用控件
25
VB 6.0程序设计
背景知识
• 组合框
– 组合框同时具备了文本框和组合框的属性。组合框 的很多属性跟列表框有点类似，比如List，ListIndex， ListCount和Text属性等。组合框的主要方法有 AddItem，RemoveItem，Clear和Refresh等，主要事 件有Click，DblClick，Change和KeyPress等。
29
VB 6.0程序设计
任务9 任务
• • • • • • 学习目的 工作任务 实现步骤 背景知识 小结 练习
图片浏览器
30
VB 6.0程序设计
学习目的
1．掌握图片框和图像框的使用。 2．掌握滚动条的使用。 3．掌握通用对话框的使用。
31
VB 6.0程序设计
工作任务
• 设计一个图片浏览器程序，用户通过打开“文 件”对话框选择一个图片文件，然后在程序中 把这张图片显示出来，调整滚动条可以改变图 片的大小。
背景知识
• 图像框的常用属性
– Picture属性，设置显示的图形文件。 – BorderStyle 属性，设置对象的边框样式。设置为 0 时，无边框；设置为1时，为固定单边框。 – Stretch 属性，设置是否缩放图形来适应控件大小。
40
VB 6.0程序设计
背景知识
• 滚动条
– 滚动条（ScrollBar）控件可以进行数据输入。滚动 条控件有水平和垂直滚动条两种类型。这两种滚动 条除了显示方向不同外，其功能和操作是一样的。 在滚动条两端各有一个滚动条箭头，在滚动条箭头 之间有一个滚动块。滚动块从一端移至另一端时， 其Value属性值在不断变化。垂直滚动条的最上端代 表最小值，最下端代表最大值。水平滚动条则是左 端代表最小值，右端代表最大值。VB 6.0规定其值 的范围从－32 768～32 767。可以用min属性和max 属性指定滚动条的Value属性值变化的范围。
VB常用控件
【案例1.3】建立如图界面，选择不同字形，标签的文字发生相应变化
对象 标签
复选框
对象名称
Label1
Check1 Check2 Check3
属性 Caption
Font Caption Caption Caption
属性值 复选框的应用
三号 粗体 斜体 下划线
【案例1.3】建立如图界面，选择不同字形，标签的文字发生相应变化
控件属性 名称
Caption Enabled
Value
属性值
Option1 Option1
True False True False
控件属性 名称
Caption
属性值
Frame1 Frame1
说明 设置单选按钮的名称，
设置按钮的标题。 设置按钮是否可用
设置按钮是否为选中状态
说明 设置框架的名称， 设置框架的标题。
【案例1.1】设置字体字号颜色
部分程序代码 Private Sub Option1_Click()
Label1.FontSize=12 End Sub
Private Sub Option4_Click() Label1.FontName=”宋体”
End Sub
Private Sub Option7_Click() Label1.ForeColor=VBRed
【案例1.8】建立如图三个类型的组合框，并输入相应内容
【案例1.8】建立如图三个类型的组合框，并输入相应内容
对象 组合框
对象名称 Combo1 Combo2 Combo3
属性 List Style List Style List Style
属性值 1,2…
0 a,b…
vb6.0_控件简介
二.Caption属性（字符串类型）
控件的Caption属性值为显示在控件上的标题，运行时 用户在界面上看到的是Caption值。
三.BackColor属性（整数类型，取值0，1）
该属性值用以指示标签是否透明。 BackColor属性值为0时，透明。 BackColor属性值为1时，不透明。
四.BorderStyle属性（整数类型，取值0，1）
该属性值用以设置控件是否有边框。 BorderStyle属性值为0时，无边框。 BorderStyle属性值为1时，有边框。
阶段2 标签框控件常用事件
标签框控件和命令按钮一样，也可以响应如 Click、Dbclick等事件。在程序设计中，习惯上 还是作为文本显示使用。
任务4 文本框控件
阶段1 文本框控件常用属性 阶段2 文本框控件常用事件
阶段1 文本框控件常用属性
一.Text属性（字符串类型）
该属性是文本框控件最重要的属性之一。可以 在设计时设定Text属性，也可以在运行时直接在 文本框内输入或用向Text属性赋值的方法来改变 该属性的值。 向文本框控件的Text属性赋值，格式为：文本 框控件名.Text=<字符串>
不是所有的控件都有Caption属性，如文本框、驱动器 、目录、文件列表框、图像或图片框、定时器、滚动 条、组合框、数据库等控件。
“Caption”属性的默认值与控件的“名称属性”同名 。
重新设置控件的Caption属性，变化的只是控件的外观 ；而重新设置控件的名称属性则不然。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
求阶乘1!+2!+3!+……+10!的和
Private Sub Command1_Click() p=1 For i = 1 To 10 p=p*i Sum = Sum + p Next i
Print "1!+2!+3!+……+10!="; Sum End Sub
Private Sub Command1_Click() b=1 :a=2 :i=1 Print "no."; i; "="; a; "/"; b For i = 2 To 20 a = a+b b = a-b Print "no."; i; "="; a; "/"; b Next i
End Sub
例：输入三角形的三条边长，计算三 角形面积。
界 面
程序代码
Private Sub Command1_Click() A = Val(Text1.Text) B = Val(Text2.Text) C = Val(Text3.Text) L = A + B > C And B + C > A And C + A > B If L Then S = (A + B + C) / 2 Area = Sqr(S * (S - A) * (S - B) * (S - C)) Text4.Text = Area Else Text4.Text = "不能构成三角形“ End If
If d > 0 Then
r = Sqr(d) / (2 * a)
X1 = p + r
X2 = p – r
endif
If d = 0 Then X1 = p : X2 = p If d < 0 Then
q = Sqr(-d) / (2 * a) p = CInt(p * 100) / 100 q= CInt(q * 100) / 100 X1 = p& "+" & q & "I " X2 = p & "-" & q & "I" endif Text4.Text = X1 Text5.Text = X2 endsub
S = (a + b + c) / 2
Area = Sqr(S * (S - a) * (S - b) * (S - c))
Text4.Text = Area
End Sub
界面设计(计算一元二次方程的实根）
代码设计 (计算一元二次方程的根）
Private Sub Command1_Click() a = Val(Text1) b = Val(Text2) c = Val(Text3) d=b*b-4*a*c p = -b / (2 * a)
Caption、 Vlalue、Style与 单选钮相同
复选框
Private Sub Check1_Click() If Check1.Value = vbChecked Then Text1.FontBold = True End Sub (错误的写法)
代码设计 方法二： (计算一元二次方程的根）
Private Sub Command1_Click() a = Val(Text1) b = Val(Text2) c = Val(Text3) d=b*b-4*a*c p = -b / (2 * a)
接下页：
If d >= 0 Then
If d > 0 Then
运行界面 (计算一元二次方程的实根）
第五章 常 用 控 件
5.1单选按钮和复选框形状控 件 5.2列表框和组合框 5.3 滚动条和Slide控件 5.4时钟 5.5 图片框和图像框 5.5 ProgressBar控件 5.7 UpDown控件 5.8 Animation控件 5.9 SSTab控件 5.10 鼠标器和键盘
End Sub
运行结果
Private Sub Command1_Click()
a = Val(Text1): b = Val(Text2): c = Val(Text3)
L = a + b <= c Or b + c <= a Or c + a <= b If L Then Text4 = "不能构成三角形" : Exit Sub If a <> b Or b <> c Or c <> a Then Text4 = "一般三角形“ If a = b Or b = c Or c = a Then Text4= "等腰三角形" If a = b And b = c And c = a Then Text4 = "等边三角形"
Text1.ForeColor = vbRed End Sub
Private Sualue Then _
Text1.ForeColor = vbBlue End Sub
复选框 （CheckBox）也 称作、选择框。 一组复选框控件 可以提供多个选 项 重要属性：
5.1 单选钮和复选框、框架
1单选钮 （OptionButton） 一组彼此相互排斥 的选项，任何时刻 用户只能从中选择 一个选项，实现一 种“单项选择”的 功能，被选中项目 左侧圆圈中会出现 一黑点。
单选按钮
Private SubOption3_Click() If Option3.Value Then _
q = Sqr(d) / (2 * a) X1 = p + q ： X2 = p - q Else X1 = p ： X2 = p End If Else q = Sqr(-d) / (2 * a)
p = CInt(p * 100) / 100 : q= CInt(q * 100) / 100
X1 = p& "+" & q & "I " : X2 = p & "-" & q & "I" End if Text4.Text = X1 ： Text5.Text = X2 End sub
文本框的换行输出: Private Sub Command1_Click() For i = 1 To 100 step 2 text1 =text1+format(str(i),”@@@”) Sum = Sum + i
N=n+1 If n mod 5=0 then text1=text1+vbcrlf Next i Text2= Sum End Sub