ProblemTrapping VSS events in VB6.

Hi,
I am developing a VSS Add-in in VB6. I am intending to trap VSS
events. I have referred to sample Add-In code provided by MS. but
neither code nor the article on Atuomation provides clear way to
accomplish this.
I have searched online and even this forum but nothing to avail.

It will be a great help if someone can suggets me the way to do this
or provide some code snippet to do this.

Thanks in Advance
Mohak.