vb.net自建事件的简单介绍

vb.net 自定义事件

变量值的改变本身就是你程序控制的，也就是说它的变化完全是在你掌控中的，做变量值改变的触发事件实在没有价值。

创新互联公司长期为上1000家客户提供的网站建设服务，团队从业经验10年，关注不同地域、不同群体，并针对不同对象提供差异化的产品和服务；打造开放共赢平台，与合作伙伴共同营造健康的互联网生态环境。为河东企业提供专业的网站设计制作、网站建设，河东网站改版等技术服务。拥有十多年丰富建站经验和众多成功案例,为您定制开发。

通常编程者关心的应该是用户操作的控件值发生变化，但这些控件的事件通常都是定义好的，且已经定义的非常全了。

猜测搂主其实是想学习自己制作控件，那就高深了，很多底层的事件通常都是从基本控件中获得的！

vb.net自定义控件的事件问题

题外话,从JAVA转过来的,为什么不用C#,毕竟JAVA和C#接近

添加事件处理程序借助设计器就可以了.我下面说的是如何用代码处理

在用户控件的构造函数Sub New()里添加代码注册事件处理函数

AddHandler ToolStripMenuItem1.Click, AddressOf MyHandler

然后实现这个处理函数

Sub MyHandler(sender As Object, e As EventArgs)

'在这里处理这个菜单命令

End Sub

vb.net给控件加事件

两种方法：

1. 用WithEvents声明变量，这样你就可以像对待拖上去的控件一样操作：

Public Class Form3

WithEvents btn As New Button

Private Sub Form3_Load(sender As Object, e As EventArgs) Handles Me.Load

Controls.Add(btn)

End Sub

Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click

MsgBox(Now)

End Sub

End Class

2. 使用AddHandler 语句：

Public Class Form3

Private Sub Form3_Load(sender As Object, e As EventArgs) Handles Me.Load

Dim btn As New Button

AddHandler btn.Click, AddressOf btn_Click

Controls.Add(btn)

End Sub

Private Sub btn_Click(sender As Object, e As EventArgs)

MsgBox(Now)

End Sub

End Class

WithEvents (Visual Basic)：

AddHandler 语句：