vb.net中自定义事件的使用方法
2010-03-18 16:27
351 查看
'VB.net 自定义事件使用方法
'1.先定义包含事件的类(如下)
Public Class TestEvent
Public Event MyEvent(ByVal s As String) '自定义事件
Public Sub StartEvent(ByVal value As String) '触发事件函数
RaiseEvent MyEvent(value) '触发事件
End Sub
End Class
'2.在使用事件的类中添加如下代码
'声明事件对象
Private WithEvents mEvent As TestEvent
'实例化
mEvent = New TestEvent
'处理事件函数 注意:函数名必须为 变量名_事件名
Private Sub mEvent_MyEvent(ByVal s As String) Handles mEvent.MyEvent
MsgBox(s)
End Sub
'触发事件
mEvent.StartEvent("11111")
3.
'声明事件对象
Private mEvent As TestEvent
'实例化以及绑定处理函数
mEvent = New TestEvent
AddHandler (mEvent.MyEvent), AddressOf OnMyEvent
'处理事件函数
Private Sub OnMyEvent(ByVal s As String) Handles mEvent.MyEvent
MsgBox(s)
End Sub
'触发事件
mEvent.StartEvent("2222222")
'1.先定义包含事件的类(如下)
Public Class TestEvent
Public Event MyEvent(ByVal s As String) '自定义事件
Public Sub StartEvent(ByVal value As String) '触发事件函数
RaiseEvent MyEvent(value) '触发事件
End Sub
End Class
'2.在使用事件的类中添加如下代码
'声明事件对象
Private WithEvents mEvent As TestEvent
'实例化
mEvent = New TestEvent
'处理事件函数 注意:函数名必须为 变量名_事件名
Private Sub mEvent_MyEvent(ByVal s As String) Handles mEvent.MyEvent
MsgBox(s)
End Sub
'触发事件
mEvent.StartEvent("11111")
3.
'声明事件对象
Private mEvent As TestEvent
'实例化以及绑定处理函数
mEvent = New TestEvent
AddHandler (mEvent.MyEvent), AddressOf OnMyEvent
'处理事件函数
Private Sub OnMyEvent(ByVal s As String) Handles mEvent.MyEvent
MsgBox(s)
End Sub
'触发事件
mEvent.StartEvent("2222222")
相关文章推荐
- VB.NET中使用FTP下载文件的两种方法。
- VB.NET中treeview使用方法一
- C#实现只运行单个实例应用程序的方法(使用VB.Net的IsSingleInstance)
- 'VB.net 自定义事件使用方法
- VB.Net My.Resource的使用方法
- VB.Net日期格式化的5种使用方法
- VB.NET中使用代表对方法异步调用
- vb.net 使用windows API方法
- VB.NET中使用代表对方法异步调用
- VB.NET中使用FTP下载文件的两种方法
- 在VB.NET应用中使用MySQL的方法
- vb.net datagridview 使用方法
- VB.NET中使用FTP下载文件的两种方法
- openssl vb.net 调用申明,和使用方法
- 在VB.NET应用中使用MySQL的方法
- VB.NET中使用代表对方法异步调用
- Proe4.0使用VB.net生成缩略图方法
- vb.net中类的使用方法
- vb.net datagridview 使用方法
- vb.net datagridview 使用方法