VB调用matlab编译的DLL出现自动化错误

Public a As my.Class1
Private Sub Command1_Click()
Dim r As Variant
Set a = New my.Class1
Call a.fun1(1, r, 3, 4)
End Sub
代码如上：就是到set这一步的时候出现自动化错误，我怀疑DLL没注册好，然后手动注册，结果一直出现“DLL初始化例程失败”，头大了，毕设被这一步卡住了，请高手帮忙解答哈 我也出现了同样的问题，帮你顶。 有没有安装matlab或其运行库

补充：VB ,  COM/DCOM/COM+