编写带窗体的DLL

我想编写一个带窗体的DLL文件，但是就是无法调出窗口，或者就是直接出现错误信息，不知道哪位大大能给个例程，多谢了啊！ 1窗体，1类
class1:
public function ShowForm()
    dim oForm as new Form1
    oFomr.show
end if 先作为窗体调试
在生成DLL文件。 1、在ActiveX DLL工程中添加一个窗体，比如：DllForm；
2、然后在类模块中编写一个函数：

'显示DLL中的窗体：

'调用方法：Call ShowDLLForm(DllForm,True)

Public Function ShowDLLForm(DllForm as Variant,ByVal ShowValue As Boolean)as Boolean

       DllForm .Visible = ShowValue              

        ShowDLLForm=true        

End Function

补充：VB ,  基础类