vb用户控件制作讲解与实例.pdf

vb用户控件制作讲解与实例--1.定义控件的属性、事件和方法，其中属性是最常使用的。2.保存和读取中间用户设置的属性值。3.为达到你的预定目的而调用的各种技术手段。在用户控件中定义的属性、事件、方法，其性质都必须是公用的，也就是说，只有用Public来定义，这样你才能在主程序代码中使用这些事件和方法，以及设置或获取这些属性值，也只有公用的属性才会在窗体页面相关控件的属性窗口显示出来。一、属性属性是用户控件最基本的东东，用户控件可以没有事件，可以没有方法，但不能没有属性（当然，技术上来说是可以没有属性的，但这样的控件使中间用户无法进行任何设置，是没有什么意义的）。那么，如何定义用户控件的属性呢？为用户控件添加属性有两种办法：1.公用变量法：public变量名称as类型这里的变量名称就是属性名称。这样定义的属性一般不会保存属性值，所以常常用作只读属性，在笔者的用户控件中，用于对主程序返回一个必要的值。例如“四则运算”控件中的“ComputeAnswer”属性：PublicComputeAnswerAsString它返回的是计算结果，而计算结果是不需要保存在控件中的，所以把它用公用变量法定义。再例如消息框控件中的FeedValue属性：PublicFeedValueAsInteger'返回值它返回最终用户选中的消息框按纽的编号，这个编号也只需要在主程序中处理，而无需保存在控件中，所以也用公用变量法定义成只读属性。2.property过程法：publicpropertyGet过程名称()as类型……endpropertypublicpropertyLet过程名称(new值as类型)……endproperty这里的过程名称就是属性名称。而property过程法又有两种：一种是如上所述的标准过程法，另一种就是枚举法。㈠标准过程法这是用得最多的一种属性定义方法。在用户控件的代码页面选中“工具→添加过程”，会跳出一个对话框，然后在单选按纽中选择“属性”，再在“名称”栏中输入属性名，点击确定，VB就会自动生成1vb用户控件制作讲解与实例--vb用户控件制作讲解与实例--上述的几行代码，你将“类型”改为你所需要的，再输入相关代码即可。标准过程法中，Get过程和Let过程一般是成对出现的。例如“闪烁标签”控件中定义闪烁时的前景颜色FlickerForeColor属性的代码：PublicPropertyGetFlickerForeColor()AsOLE_COLOR'闪烁时的文字色FlickerForeColor=mGlintForeColorEndPropertyPublicPropertyLetFlickerForeColor(ByValnewColorAsOLE_COLOR)mGlintForeColor=newColorPropertyChanged"FlickerForeColor"EndProperty这两段代码中的“OLE_COLOR”是颜色数据类型，实质上也是长整形的数据类型，但它会自动调出颜色对话框。“FlickerForeColor”是属性名称，在窗体界面相关控件的属性窗口中显示的就这个属性名称。而“mGlintForeColor”是中间变量，中间变量是私用的，用Dim定义即可。在用过程法定义属性时通常都需要中间变量。中间变量的身份是“代表”（代表属性名），作用有两个，一是上传下达，在Get/Let过程与ReadProperties/WriteProperties过程中充当“邮递员”；二是参与，在许多别的过程中都要与中间变量打交道。Get过程的作用是获取相关的属性值，并将属性名称和属性值显示在属性窗口（如果你去掉这个过程，在属性窗口就不会出现相关的属性名称和属性值了）。它在三种情况下被激活：①中间用户在窗体页面刚刚把焦点移到窗体上的控件时（例如点击该控件），在属性窗口显示出原先设置的属性值；②中间用户在属性窗口修改了属性值，在属性窗口显示出修改后的属性值；③程序运行中用代码获取属性值时，假设窗体代码有这么一句：RGB=Cipher.BackColor，那么也会激活该过程。Let过程的作用是设置相关的属性值，它在两种情况下被激活：①中间用户在属性窗口修改了控件的属性值（执行顺序是：Get过程→Let过程→Get过程）；②程序运行中用代码设置新的属性值时，例如：Cipher.BackColor=RGB。变量NewValue是被赋的新值（这个变量名是可以改变的），你可以把得到的NewValue的值按自己的需求作任何用途。要注意的是，如果这个属性是一个对象，那么就不能用Let过程而必须用Set过程了，这是因为保存在控件内部的对象变量，保存的并不是对象的拷贝，而只是对象的引用（也就是一个内存地址）。所以在它的Get和Set两个属性过程中，均