关于自动化编程的问题

我用delphi编了一个ActiveX Dll,其中定义了一个接口IMailMsg并定义一个访问过程ReadMailMessage(eid:integer,var EMailMsg:IMailMsg),现在我在vb中定义接口变量dim EMailmsg as new EMail.EailMsg,然后调用ReadMailMessage(1,EMailMsg),程序出错。我的原意是通过EMailMsg参数把获得的数据转出。以上那里有误，请各位大虾不吝赐教。