为第三方控件定义事件过程

本节内容针对专业程序员,一般用户可以忽略。

下面用一个简单的例子,说明如何添加第三方控件,并为其定义事件过程。
以.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 过程名


本页地址:http://www.foxtable.com/webhelp/topics/2374.htm