VB_DESK_T6_北大青鸟VB学习教材

基于VB的桌面系统开发方案ActiveX控件回顾1、下列说法正确的是：a、COM定义了一个允许应用程序之间进行交互的模型b、COM是OLE的一个实现c、在WORD文档中插入EXCEL对象,WORD是服务器端d、客户端程序必须注册d、链接方式比嵌入方式创建的文件大回顾（续1）2、关于COM服务器类型，下列说法正确的是：a、自动服务器，ActiveX允许客户端访问其对象的方法和属性b、ActiveX允许客户端访问其对象的事件课题目标了解什么是ActiveX控件及其用处了解控件类的概念了解创建和编译一个ActiveX控件的步骤理解属性包PropertyBag的用途把ActiveX控件作为数据源控件使用ActiveX控件VisualBasic提供了许多ActiveX控件，如ADO数据控件、状态条、工具条、DataCombo和DataList控件可以创建自己的控件,方便的开发第三方控件不但可以在工具箱中使用，而且也可以在Web中使用更可以在其它语言环境中使用，这就为大型软件系统的设计，提供了一个相当好的机制。ActiveX的介绍COM的目标之一是共享资源和创建可重用组件，ActiveX控件在界面层实现重用一个ActiveX控件就是一个具有下列特征的COM对象：识别事件的能力能够对这些事件编写代码可以执行用户编写的不同事件的代码和其它的COM对象一样拥有方法和属性ActiveX控件（续1）在VisualBasic中有三种创建控件的模型：创建自己绘制的控件使用可视的元素和自己选择的行为来创建自己的控件这种类型的控件称为用户绘制（user-drawn）的控件在已存在的简单控件上增加功能已存在的控件上添加自己的属性、方法和事件从多个已有的控件集成一个新的控件创建一个ActiveX控件第一步是创建一个“ActiveXControl”类型的工程这类工程中没有窗体只有一个UserControl对象这个对象和窗体类似，但是没有边界已有的控件可以象在标准窗体中一样把它们放置到UserControl对象中BackStyle属性和ToolBoxBitmap属性创建属性页VisualBasic也提供了一个属性页向导来帮助我们为控件添加属性页通过外接程序管理器加载“VB6PropertyPageWizard”就可以使用这个向导了向导的第一页显示的是“添加属性页”窗口，它允许我们添加想在用户控件中使用的属性页属性值向导为每一个属性产生一个PropertyLet和一个PropertyGet方法PropertyLet方法任何时候用户改变属性的值时被调用PropertyGet方法任何时候用户试图获得属性的值时被调用PropertyChangedPropertyNamePropertyBag对象写入属性读取属性PropertyBag对象保存属性值WriteProperties事件在控件被撤消或重新创建时触发这个事件是用来存储PropertyBag对象中的每个属性语法：Subobject_WriteProperties(PropbagAsPropertyBag)Object:用户控件的名称Propbag:将要向它填写数据的PropertyBag类型的对象保存属性值（续）在WriteProperties事件中，使用到PropertyBag对象的WriteProperty方法这个方法要求指定属性的名字、属性当前值和缺省值语法：object.WriteProperty(Name,Value,DefaultValue)Object:用户控件的名字保存属性值（续）PrivateSubUserControl_WriteProperties(PropbagAsPropertyBag)PropBag.WriteProperty(“BorderStyle”,UserControl.BorderStyle,0)EndSub获取属性值ReadProperties事件：在控件被加载时触发通过它从PropertyBag对象中获取属性的有关信息语法：Subobject_ReadProperties(PropbagAsPropertyBag)Object:用户控件的名字获取属性值（续）在ReadProperties事件中使用到PropertyBag对象的ReadProperty方法它要求指定属性的名称和缺省值指定缺省值的原因是为了防止出现属性没有被保存的情况语法：object.ReadProperty(Name[,DefaultValue])获取属性值（续）Object:用户控件的名字PrivateSubUserControl_ReadProperties(PropBagAsPropertyBag)UserControl.BorderStyle=PropBag.ReadProperty(“BorderStyle”,0)EndSubInitProperties事件InitProperties在第一次创建控件的实例时发生。在这个事件中可以设置没有映射到成员控件的属性的初始值已映射的属性已经被相应的成员控件初始化测试和使用ActiveX控件测试ActiveX控件使用ActiveX控件第一步是把ActiveX控件工程编译为一个“ocx”文件第二步是把这个控件加入到VisualBasic工具栏中，通过使用“工程”菜单中的“部件(component)”对话框来实现从对话框中选中这个控件并把它加入到VisualBasic工具栏中作为数据源的ActiveX控件步骤从“引用”对话框中添加“ActiveXDataObjects2.0”库的引用设置用户控件的DataSourceBehavior属性为vbDataSource在用户控件的Initialize事件中设置连接和记录集对象编写代码让控件实现所需要的功能本课总结ActiveX控件的特征创建自定义控件的方法有三种控件类用来创建控件的模板ActiveX控件接口向导用来为ActiveX控件创建属性使用PropertyChange方法来修改属性值PropertyBag对象用来保存被消除或是被重新创建的控件的属性信息使用WriteProperties事件来把属性保存到ProperBag对象中本课总结（续）使用ReadProperties事件从PropertyBag对象中获取属性值InitProperties事件在第一次创建一个控件的事例时触发VisualBasic为一个工程中的所有控件创建一个.ocx文件当一个ActiveX控件的DataSourceBehavior属性被设为vbDataSource时，表示这个控件可以用作数据绑定控件的数据源