Raise error in ActiveX Control init proc

I want to raise an user defined error in ActiveX Control init procedure. I have used correct syntax but the error displayed with correct error code only, the error message is not mine. How can I correct it? (The error displayed correctly in VB IDE)