程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> .NET網頁編程 >> .NET實例教程 >> Vb.net 事件動態注冊

Vb.net 事件動態注冊

編輯:.NET實例教程

Vb.Net 事件動態注冊本質上與委派的本質相同。

具體過程:

1        申明一個公有的委派方法 格式:Public Delegate Sub 自定義過程名xx (參數表)

2        申明一個事件,其類型是1所申明的方法

格式:Public Event 事件名yy As自定義過程名xx

3        另定義一個對事件處理的過程

   語法格式:

Dim Sub 事件處理過程名zz(參數表)

4        動態向該事件注冊

語法格式: AddHandler 事件名yy, 事件處理過程名zz的入口地址

5        產生事件

語法格式

RaiseEvent事件名yy(實參表)

注意:動態注銷事件的過程為:removehandler

  語法格式: RemoveHandler事件名yy, 事件處理過程名zz的入口地址

 

''以下是事件申明使用代碼

Public Class class1

    Delegate Sub aaHndler(ByVal name As String)

    Public Event evt As aaHndler

    Private name As String = "aaa"

    Sub work(ByVal name As String)

        MsgBox(name)

    End Sub

    Public Sub New()

    End Sub

 

    Public Sub dd()

        AddHandler Me.evt, AddressOf work

        RaiseEvent evt(Me.name)

    End Sub

End Class

 

''以下是調式運行代碼

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Dim obj As class1 = New class1()

        obj.dd()

 End Sub

 
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved