ActiveX控件的创建(2)
3)具体实现方法
(1)确定DataListView控件的功能
标准的ListView控件在显示数据库记录时还存在一些不足,如必须编写大量的代码等,DataListView通过在ListView的基础上添加部分功能而弥补了ListView的不足,因此它除了本身固有的属性、方法和事件外,添加了如下成员:
◆ DataServerName属性 -- 确定所操作的数据库服务器。
◆ DataBaseName属性 -- 确定所操作的数据库。
◆ AdministratorName属性 -- 确定操作数据库的管理员名称。
◆ PasswordName属性 -- 确定操作数据库的管理员口令。
◆ ShowDataBase方法 -- 显示Select命令所执行的数据库操作结果。
◆ErrorDataBase事件 -- 当遇到错误的数据库操作时引发该事件。
(2)设计控件的外观
DataListView由于仅包含一个ListView控件,所以其外观没有太多需要考虑的问题。如果要创建的控件是多个控件构成,或新控件不包括任何现存控件即完全从头开始创建一个全新的控件的话,则外观问题是一个很重要的问题。
(3)设计控件的接口,即属性、事件和方法
对ListView控件所作的改进是为了让ListView控件支持数据库的内容显示,以便在所有能支持ActiveX控件的应用程序中使用。通过添加用户自己的属性DataServername、DataBaseName、AdministratorName、PasseordName和方法ShowDataBase等可以实现这项功能。DataListView的其他属性、事件和方法都和标准ListView一样。
(4)创建由控件工程和测试工程组成的工程组
◆启动一个新的ActiveX控件工程。
◆按下CTRL+T 组合键或者选择【工程】|【部件】菜单选项,显示【部件】对话框,在【控件】选择框中选择Microsoft Windows Common Controls 6.0。
◆ 选择【工程】|【引用】菜单选项,显示【引用】对话框,在【可用的引用】选择框中选择Microsoft ActiveX Data Objects 2.0 Library。
◆在UserControl窗口中添加一ListView控件,ListView控件的左上角位置为0,0。
◆设置ActiveX工程和UserControl控件属性值,如下表所示。
条目 设置
工程类型 ActiveX控件
工程名称 DataLV
工程描述 通过ADO,使得ListView控件能够直
接操作数据库
UserControl 的Name属性 DataListView
UserControl 的Public属性 True
◆保存这个工程。
◆选择【文件】|【添加工程】菜单选项。然后添加一个标准EXE工程。建 立该工程的目的是为了在创建ActiveX控件时不断地进行测试。
此时已建立了一个由控件工程和测试工程组成的工程组,下面就可以正式开始创建DataListView控件。
- 上一篇:用VB快速读取TextBox第N行的数据
- 下一篇:如何在VB中制作不回显的文本框