Infopath 2007 bind custom toolbar with the code

[MArist]

Hi,

I want to have a custom toolbar in my Infopath 2007 form.
I have added in the manifest
<xsf:toolbar caption="Toolbar" name="Toolbar">
<xsf:button name="SaveForm" caption="Save" ></xsf:button>
</xsf:toolbar>
Also i have added in the Private Sub InternalStartup(ByVal sender As Object,
ByVal e As EventArgs) Handles Me.Startup the following :

AddHandler DirectCast(EventManager.ControlEvents("SaveForm"),
ButtonEvent).Clicked, AddressOf SaveForm_Clicked

And also i have the method
Public Sub SaveForm_Clicked(ByVal sender As Object, ByVal e As
ClickedEventArgs)
' Write your code here.
MessageBox.Show("Toolbar_Save")
End Sub

BUT , When i click on the toolbar's button nothing happens!!
Can you help me?
Thanks in advance