版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。
上一节讲了设计时创建控件，实际设计时候可以很方便地选择创建控件的事件代码，
本节讲一下不使用withevents，如何在运行时创建一个带有事件的控件。
主要用到 AddHandler 语句：
AddHandler event, AddressOf eventhandler
event ：要处理的事件的名称。
eventhandler ：将处理事件的过程的名称。
这里需要强调一下，eventhandler过程的参数必须符合该控件事件对应的参数，如果不知道怎么写，不妨实际拖拽一个对应控件到设计窗体看看。
还是动态创建一个按钮：
Public Class Form2
Dim mybutton As Button
Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
mybutton = New Button
mybutton.Size = New Size(200, 70)
mybutton.Location = New Point(100, 100)
mybutton.Text = "按钮"
mybutton.Visible = True
Me.Controls.Add(mybutton)
AddHandler mybutton.Click, AddressOf buttonclick
End Sub
Private Sub buttonclick(sender As Object, e As EventArgs)
MessageBox.Show("这是一个按钮")
End Sub
End Class
运行时如图：
我们可以通过参数 sender 来获得这个按钮（或其他动态创建的控件）的相关属性，
Private Sub buttonclick(sender As Object, e As EventArgs)
'MessageBox.Show("这是一个按钮")
Dim thisButton As Button = CType(sender, Button)
MessageBox.Show("我们按下了 " & thisButton.Text)
End Sub
运行时如下：
由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。
学习更多vb.net知识，请参看vb.net教程 目录
————————————————
版权声明：本文为CSDN博主「VB.Net」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。
