这段代码错在哪?关于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