Adding a function in a module (2000)

On a report that already has an event procedure set for "On Print", I want to also have it run a function "On Print" that causes it to skip blank labels on a page of labels. How do I add the function into the module?