为什么使用createobject时,系统提示"拒绝的权限"

Question

我在用VB开发时,一个工程是ActiveX Dll,里面有公用的方法,Class的为multiuser,另一个工程 是标准的EXE,该Exe呼叫上面一个dll,可是在运行时,提示"实时错误 70:拒绝的权限",断点停在CreateObject的位置.但是如果把两个工程合在一个工程组中的时候,运行不会出现错误.前几天都可以使用,现在就不行了,我重装VB也无效.代码如下
标准EXE:Private Sub Command1_Click()
    Dim a As Object
    Set a = CreateObject("mydll.class1")
    Dim b As String
    b = a.getnotice
    Debug.Print b
End SubActivex Dll:Public Function getnotice() As String
    getnotice = "good"
End Function

Answer 1

如果用生成的Dll文件就不会出现"拒绝的权限"