[VB.NET]这段代码错在哪?关于soundplayer类的

这段代码错在哪?关于soundplayer类的
Public a11 As New SoundPlayer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
a11.SoundLocation = d:/tishi.wav
a11.Load()
a11.Play()
End Sub
Sub a2() Handles a11.LoadCompleted

End Sub

结果在 sub a2 中提示 Handles子句要求一个在包含类型或它的某个基类型中定义WithEvents变量 ,错在哪了?
__________________________________________________________________________
all定义错误
Public WithEvents a11 As SoundPlayer
__________________________________________________________________________
谢谢, 是我概念不清楚,呵呵.
__________________________________________________________________________