Public Class Form1 Private Sub Service_Synchr(ByVal index As Integer) ' 处理事件 End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click ' 将方法指定到事件 AddHandler Service_SynchrEvent, AddressOf Service_Synchr End Sub End Class
VB 自定义事件和处理
猜你喜欢
转载自www.cnblogs.com/wsxaccount/p/9163504.html
今日推荐
周排行