VB6 中几个 ActiveX 控件的帮助文档
合集下载
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
Set ImageCombo1.ImageList = ImageList1 '绑定ImageList图像列表控件
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属性 '上下方区域单击时改变的值
SmallChange属性 '两端的箭头钮上单击时改变的值
Value 属性 '当前滑块所处位置的值
Change 事件 '当滑块位置发生变化时就引发了Change事件
8.---------------
ColumnHeader对象:用 Add 方法添加这个对象到ColumnHeaders集合中。
HideColumnHeaders属性: 决定是否在ListView控件中显示列标头
SelectedItem属性:包含DataList控件中选中的记录的关键字
BeforeLabelEdit事件:当试图编辑当前被选中的对象的标签时发生
StatusBar1.Panels(1).Text = "唐伯虎说他家有七个老婆!"
Else
ProgressBar1.Visible = False '隐藏进度条
StatusBar1.Panels(1).Text = "他说没什么女人是搞不定的!"
End If
Case "tab2"
Slider1.Value = Slider1.Value + 1
MMControl1 多媒体
Microsoft Media Player --Msdxm.ocx
MediaPlayer媒体播放器
1.------------
ImageList控件: List Image 对象的集合,用于程序需要调用的图片
图象列表用来储藏多个图像,ListView.ToolBar.TabStrip.Header.ImageCombo.TreeView
caption 可选的.在 Button 对象下显示的Caption 标题
style 可选的.Button 对象的Style 样式属性
image 可选的.在相关联的ImageList控件内,指定一个索引号的Image图像
9.-----------
TreeView控件: 显示结点（ Node） 对象的分层列表
Case 3
StatusBar1.Panels(1).Text ="你们严肃点,正在打劫呢!?"
Case 5
End '关闭窗口结束
End Select
End Sub
'Tabstrip1-属性-通用-图像列表=Inagelist1,一个ProgressBar控件,一个Slider控件
'Tabstrip1-属性-选顶卡-索引1的图像=1、关键字=tab1、索引2图像=2、关键字=Tab2
Private Sub Toolbar1_ButtonClick(ByValButton As Button) '按钮被单击事件
Select CaseButton.Index'返回全部索引号
Case 1 '比较索引号相等就运行下面代码跳到End Select结束
StatusBar1.Panels(1).Text ="不回帖站左边灌水站右边!"
MinimunWidth宽度 '窗格的宽度
AutoSize自动调整 '0不调整,1-sbrSpring自动伸长,2-sbrContents自动匹配伸缩
在过程中加入以下代码
StatusBar1.SimpleText = "要显示的内容" '单窗格显示通用SimpleText简单文本
StatusBar1.Panels(X).Text = "要显示的内容" '多窗格里显示文本或图形X=索引值
StatusBar控件:创建工具栏的 Button 对象的集合
A)点状态栏右键→Properties属性→Panels窗格
Insert Panel插入,Remove Panel删除 '用来增删状态栏中的窗格数目
Index索引 '在程序中我们通过窗格的索引值来引用窗格
Text文本 '在各个窗格中显示的文字
说明：
VB6 中几个 ActiveX 控件的帮助文档
Download 1:
--------------------------------
ImageCombo
ImageList
ListView
ProgressBar
Slider
StatusBar
TabStrip
Toolbar
TreeView
Download 2:
--------------------------------
Internet_Transfer_Control
Download 3:
--------------------------------
DataGrid_Control
摘录一篇文章：
/article.asp?id=5614
VB6 中几个 ActiveX 控件的帮助文档
作者：
MS
E-Mail：
主页地址：
/
文件类型：
rar
文件大小：
293 KB
更新日期：
2004-1-25
下载地址：
Download 1(293KB)
Download 2(47KB)
Download 3(123KB)
Select Case Slider1.Value '返回滑块条当前值
Case 9
Dim Suibian1 AsComboItem'图象组合框
Set Suibian1 = boItems.Add(1, "Img1", "分层列表控件")
Set Suibian1 = boItems.Add(2, "Img2", "视图排列控件")
If ProgressBar1.Value > 95 Then
StatusBar1.Panels(1).Text = "嘿嘿嘿!还搞,要出事啦!"
End If
End Select
End Sub
'ImageCombo1-属性-通用-图像列表=Inagelist1
Private Sub Slider1_Change() '控件内容改变事件
右键分层控件-属性-通用-图像列表=ImageList1
Style 属性: 设置成显示图像的样式
Change 事件: 指示一个控件的内容已经改变的
'StatusBar1-窗格-插入4个索引(最小宽度分别为2340,1039,540,840)
'索引2样式=6(显示日期),索引3可以插入一个国旗,索引4样式=5(显示时间)
mima=InputBox("请输入密码:", "密码框")
Loop
End Sub
'Inagelist1-图像-插入5个图片
'Toolbar1-属性-按钮-插入有8个索引(2.4.6的分别样式=3-分组)
'1.3的工具提示文本=打开、运行,5=按此键后果严重
'6.7通用-图象列表=Inagelist1、按钮-图片=4和5
Style样式属性 '0-tabTabs三维边框,1-tabButtons没有边框,2-tabFlatButtons水平按钮
在代码中常用语句的属性
TabWidthStyle属性 '决定了每一行的外观
SelectedItem属性 '返回一个控件中选中的记录的书签
Key属性 '返回或设置唯一标识集合中一个成员的Name关键字
ByVal关键字 '表示该参数按值传递
Button.Index'返回Toolbar控件的Buttons集合的全部索引号.
5.-----------
TabStrip控件:为某个窗口或者对话框的相同区域定义多个页面
A)右击页框控件→属性→General通用(Tabs选顶卡)
TabStrip属性窗口 Tabs标签 Caption标题 Name关键字ToolTipText提示文本 Font字体
Add 添加Button对象语法:object.Add(index, key, caption, style, image)
object 必需的.其值是 Buttons 集合.
index 可选的,指定要插入 Button 对象的位置.默认下加到末尾。
key 可选的,标识 Button 对象的Name 关键字
ListView控件:使用四种不同视图显示项目,必需设图像列表为ImageList属性
右键排列控件-属性-图象列表 全部=ImageList1
View属性: 列表中查看视图方法 0-lvwIcon图标 1小图标 2-lvwList列表 3-lvwReport报表
ListItem对象: 定义ListView控件中项目的简要描述、图标、文本片段
ProgressBar进程条TreeView分层显示ListView排列显示
ImageList图象列表 Slider 滑块ImageCombo图象组合框
Microsoft Common Dialog Control 6.0 -- Comdlg32.ocx
CommonDialog通用对话框
Microsoft Multimedia Control 6.0 --Mci32.ocx
Alignment对齐 '窗格中文本的对齐方式；
Style样式属性: 窗格的样式(0-sbrText显示文本,5-sbrTime时间,6-sbrDate显示日期)
Bevel斜面 '窗格的凹凸状态(0-sbrNoBevel不显示斜面,1-sbrInset凹,2-sbrRaised凸)
Browse浏览 '在窗格中加入图片
6.--------------
ProgressBar控件:监视操作完成的进度
Min 属性 '代表进程条全空时的值，缺省时为0。
Max 属性 '代表进程条全满时的值，缺省时为100。
Value属性 '代表进程条当前的值（但不出现在属性窗口中）
7.---------
Slider控件:滑块和可选择性刻度标记的窗口
4.----------
ToolBar控件:创建与应用程序相关联的工具栏
A)点工具条右键→属性
Buttons按钮 Insert插入按钮
按钮分组:先插入一个按钮,所样式属性改为3-Separator
为工具栏增加图画:
通用→图象列表→选择ImageList控件
按钮→插入按钮→Image图像=1
ButtonClick事件 '单击 Toolbar 控件内的 Button 对象时发生
----------------常用ActiveX控件-----------------------------
Windows通用控件Microsoft Windows Common Controls 6.0
路径：Windows\system\MscomctL.ocx
TabStrip页框 Toolbar 工具栏StatusBar状态栏
给5个图片分别取名 关键字=tu1,tu2,tu3,tu4,tu5
2.------------
ImageCombo控件: 标准 Windows 组合框的允许绘图版本
右键组合框控件-属性-通用-图像列表=ImageList1
图象组合框的列表部分中的每一项都可以显示一个有自己的图片的项目列表
3.------------
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属性 '上下方区域单击时改变的值
SmallChange属性 '两端的箭头钮上单击时改变的值
Value 属性 '当前滑块所处位置的值
Change 事件 '当滑块位置发生变化时就引发了Change事件
8.---------------
ColumnHeader对象:用 Add 方法添加这个对象到ColumnHeaders集合中。
HideColumnHeaders属性: 决定是否在ListView控件中显示列标头
SelectedItem属性:包含DataList控件中选中的记录的关键字
BeforeLabelEdit事件:当试图编辑当前被选中的对象的标签时发生
StatusBar1.Panels(1).Text = "唐伯虎说他家有七个老婆!"
Else
ProgressBar1.Visible = False '隐藏进度条
StatusBar1.Panels(1).Text = "他说没什么女人是搞不定的!"
End If
Case "tab2"
Slider1.Value = Slider1.Value + 1
MMControl1 多媒体
Microsoft Media Player --Msdxm.ocx
MediaPlayer媒体播放器
1.------------
ImageList控件: List Image 对象的集合,用于程序需要调用的图片
图象列表用来储藏多个图像,ListView.ToolBar.TabStrip.Header.ImageCombo.TreeView
caption 可选的.在 Button 对象下显示的Caption 标题
style 可选的.Button 对象的Style 样式属性
image 可选的.在相关联的ImageList控件内,指定一个索引号的Image图像
9.-----------
TreeView控件: 显示结点（ Node） 对象的分层列表
Case 3
StatusBar1.Panels(1).Text ="你们严肃点,正在打劫呢!?"
Case 5
End '关闭窗口结束
End Select
End Sub
'Tabstrip1-属性-通用-图像列表=Inagelist1,一个ProgressBar控件,一个Slider控件
'Tabstrip1-属性-选顶卡-索引1的图像=1、关键字=tab1、索引2图像=2、关键字=Tab2
Private Sub Toolbar1_ButtonClick(ByValButton As Button) '按钮被单击事件
Select CaseButton.Index'返回全部索引号
Case 1 '比较索引号相等就运行下面代码跳到End Select结束
StatusBar1.Panels(1).Text ="不回帖站左边灌水站右边!"
MinimunWidth宽度 '窗格的宽度
AutoSize自动调整 '0不调整,1-sbrSpring自动伸长,2-sbrContents自动匹配伸缩
在过程中加入以下代码
StatusBar1.SimpleText = "要显示的内容" '单窗格显示通用SimpleText简单文本
StatusBar1.Panels(X).Text = "要显示的内容" '多窗格里显示文本或图形X=索引值
StatusBar控件:创建工具栏的 Button 对象的集合
A)点状态栏右键→Properties属性→Panels窗格
Insert Panel插入,Remove Panel删除 '用来增删状态栏中的窗格数目
Index索引 '在程序中我们通过窗格的索引值来引用窗格
Text文本 '在各个窗格中显示的文字
说明：
VB6 中几个 ActiveX 控件的帮助文档
Download 1:
--------------------------------
ImageCombo
ImageList
ListView
ProgressBar
Slider
StatusBar
TabStrip
Toolbar
TreeView
Download 2:
--------------------------------
Internet_Transfer_Control
Download 3:
--------------------------------
DataGrid_Control
摘录一篇文章：
/article.asp?id=5614
VB6 中几个 ActiveX 控件的帮助文档
作者：
MS
E-Mail：
主页地址：
/
文件类型：
rar
文件大小：
293 KB
更新日期：
2004-1-25
下载地址：
Download 1(293KB)
Download 2(47KB)
Download 3(123KB)
Select Case Slider1.Value '返回滑块条当前值
Case 9
Dim Suibian1 AsComboItem'图象组合框
Set Suibian1 = boItems.Add(1, "Img1", "分层列表控件")
Set Suibian1 = boItems.Add(2, "Img2", "视图排列控件")
If ProgressBar1.Value > 95 Then
StatusBar1.Panels(1).Text = "嘿嘿嘿!还搞,要出事啦!"
End If
End Select
End Sub
'ImageCombo1-属性-通用-图像列表=Inagelist1
Private Sub Slider1_Change() '控件内容改变事件
右键分层控件-属性-通用-图像列表=ImageList1
Style 属性: 设置成显示图像的样式
Change 事件: 指示一个控件的内容已经改变的
'StatusBar1-窗格-插入4个索引(最小宽度分别为2340,1039,540,840)
'索引2样式=6(显示日期),索引3可以插入一个国旗,索引4样式=5(显示时间)
mima=InputBox("请输入密码:", "密码框")
Loop
End Sub
'Inagelist1-图像-插入5个图片
'Toolbar1-属性-按钮-插入有8个索引(2.4.6的分别样式=3-分组)
'1.3的工具提示文本=打开、运行,5=按此键后果严重
'6.7通用-图象列表=Inagelist1、按钮-图片=4和5
Style样式属性 '0-tabTabs三维边框,1-tabButtons没有边框,2-tabFlatButtons水平按钮
在代码中常用语句的属性
TabWidthStyle属性 '决定了每一行的外观
SelectedItem属性 '返回一个控件中选中的记录的书签
Key属性 '返回或设置唯一标识集合中一个成员的Name关键字
ByVal关键字 '表示该参数按值传递
Button.Index'返回Toolbar控件的Buttons集合的全部索引号.
5.-----------
TabStrip控件:为某个窗口或者对话框的相同区域定义多个页面
A)右击页框控件→属性→General通用(Tabs选顶卡)
TabStrip属性窗口 Tabs标签 Caption标题 Name关键字ToolTipText提示文本 Font字体
Add 添加Button对象语法:object.Add(index, key, caption, style, image)
object 必需的.其值是 Buttons 集合.
index 可选的,指定要插入 Button 对象的位置.默认下加到末尾。
key 可选的,标识 Button 对象的Name 关键字
ListView控件:使用四种不同视图显示项目,必需设图像列表为ImageList属性
右键排列控件-属性-图象列表 全部=ImageList1
View属性: 列表中查看视图方法 0-lvwIcon图标 1小图标 2-lvwList列表 3-lvwReport报表
ListItem对象: 定义ListView控件中项目的简要描述、图标、文本片段
ProgressBar进程条TreeView分层显示ListView排列显示
ImageList图象列表 Slider 滑块ImageCombo图象组合框
Microsoft Common Dialog Control 6.0 -- Comdlg32.ocx
CommonDialog通用对话框
Microsoft Multimedia Control 6.0 --Mci32.ocx
Alignment对齐 '窗格中文本的对齐方式；
Style样式属性: 窗格的样式(0-sbrText显示文本,5-sbrTime时间,6-sbrDate显示日期)
Bevel斜面 '窗格的凹凸状态(0-sbrNoBevel不显示斜面,1-sbrInset凹,2-sbrRaised凸)
Browse浏览 '在窗格中加入图片
6.--------------
ProgressBar控件:监视操作完成的进度
Min 属性 '代表进程条全空时的值，缺省时为0。
Max 属性 '代表进程条全满时的值，缺省时为100。
Value属性 '代表进程条当前的值（但不出现在属性窗口中）
7.---------
Slider控件:滑块和可选择性刻度标记的窗口
4.----------
ToolBar控件:创建与应用程序相关联的工具栏
A)点工具条右键→属性
Buttons按钮 Insert插入按钮
按钮分组:先插入一个按钮,所样式属性改为3-Separator
为工具栏增加图画:
通用→图象列表→选择ImageList控件
按钮→插入按钮→Image图像=1
ButtonClick事件 '单击 Toolbar 控件内的 Button 对象时发生
----------------常用ActiveX控件-----------------------------
Windows通用控件Microsoft Windows Common Controls 6.0
路径：Windows\system\MscomctL.ocx
TabStrip页框 Toolbar 工具栏StatusBar状态栏
给5个图片分别取名 关键字=tu1,tu2,tu3,tu4,tu5
2.------------
ImageCombo控件: 标准 Windows 组合框的允许绘图版本
右键组合框控件-属性-通用-图像列表=ImageList1
图象组合框的列表部分中的每一项都可以显示一个有自己的图片的项目列表
3.------------