commandBars

From my standard exe(VB6),I opened a document in
Microsoftword' and created a custom tool bar with
couple of buttons. I want to execute a function
which i write in my standard exe, by clicking
those buttons.(I dont want to use a Macro of the
document.)
when I am setting OnAction property for commandBar controls(like ommandBarControl.OnAction = form1.func1(), the code with in my function is executing at the time
assignment. It's not executing actually when I
click the command Bar Button.How can I get this
functionality?

Thanx in Advance.
Vinnu