Heya, I'm trying to figure out how to implement an abstract class in VB6. Sounds simple enough, right ? Well wrong, cause I'm having lots of troubles. Any help would be greatly appreciated.

Here's what I have :

'-------------------------------------------
(Project1 : class "Interface") <-- This is an ActiveX DLL project

Public Function Load()
End Function
'-------------------------------------------
(Project 2 : class "Implementation1") <-- this is also an ActiveX DLL Project. "Implementation1" has a reference to Project1

Implements AbstractClass.Interface

Private Function Interface_Load()
Interface_Load = "Hello World"
End Function


Now I create a form with a button and a textbox. When I click the button, I want the results from my Load method to be displayed in the textbox. Here's the code for (Project3 : Form1 ) where Form1 has a reference to Project1.

Private Sub Command1_Click()

Dim objX As Project1.Interface
Set objX = CreateObject("Implementation1")

Text1.Text = objX.Load()
End Sub


===============================
Now my problem is that when I run this program, I get the error message "ActiveX component can't create Object" and the error occurs on the 'Set objX = CreateObject(Implementation1)' line of my Form procedure.

What am I doing wrong ? Thanks for your help in advance.