ton()
AddHandler roundButton.Click, AddressOf roundButton_Click

需要注意的是，由于我们没有在RoundButton类中定义任何事件，因此它的事件处理能力是继承Control类而得来的。
我们下一步要作的就是设置RoundButton控件的一些属性了：
roundButton.Text = "Click Here!"
roundButton.BackgroundColor = System.Drawing.Color.White
roundButton.Size = New System.Drawing.Size(80, 80)
roundButton.Location = New System.Drawing.Point(100, 30)

最后，将roundButton控件添加到表单的控件集中：
Me.Controls.Add(roundButton)
当用户点击控件触发Click事件时，Click事件调用roundButton_Click事件处理程序，显示一个消息框：
Private Sub roundButton_Click(ByVal source As Object, _
ByVal e As EventArgs)
MessageBox.Show("Thank you.")
End Sub
结论
在本篇文章中，我们介绍了开发定制控件时需要理解的System.Windows.Forms名字空间中二个重要的类：Control和UserControl。另外，我们还介绍了如何通过直接扩充UserControl类开发自己的定制控件以及如何在Windows表单中使用定制控件。