为第三方控件定义事件过程
本节内容针对专业程序员,一般用户可以忽略。
下面用一个简单的例子,说明如何添加第三方控件,并为其定义事件过程。
以.Net Framework 2.0中的Button控件为例。
1、在全局代码中加入用于处理Button控件的Click事件的过程:
Public
Sub Button1_Click(ByVal
sender As
System.Object,
ByVal e
As System.EventArgs)
MessageBox.Show("这是自定义事件!")
End
Sub
提示:过程必须是Public的,否则无法调用。
2、新建一个窗口,在窗口的AfterLoad事件加入代码:
Dim
ct As
New Windows.Forms.Button
ct.Text
= "我的按钮"
e.Form.Panel.Controls.Add(ct)
AddHandler
ct.Click,
AddressOf
Button1_Click
3、现在打开窗口,单击按钮,可以发现执行了我们在全局代码中为此按钮定义的Click事件代码。
提示:
为第三方控件指定事件过程的语句是AddHandler,此语句的语法为:
AddHandler 控件.事件, AddressOf 过程名