请问为什么激发不了？

[youyou2zl]

form1中
form_Load 中或者在初始化函数里
Dim f2 As New Form2
AddHandler Button1.Click, AddressOf f2.b2click
f2.Show()
---------
form2中
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
call b2click(sender,e)
End Sub
Public Sub b2click(ByVal sender As System.Object, ByVal e As System.EventArgs)
MsgBox("button2_click")
End Sub



这个是刚刚的一个人帮我写的，可是我写上之后发现，b2click激发不了Button2_Click，请问是不是还需要加什么啊？我是菜鸟，请帮忙啊，谢谢

[FreeSelft]

Public Sub b2click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles b2click.click,Button2.Click
MsgBox("button2_click")
End Sub

[youyou2zl]

Handles 子句要求一个在包含类型或它的某个基类型中定义的 WithEvents 变量。

这个问题出现在b2click.click,一写这个就出错。麻烦请指点，谢谢