CAD2002如何用ObjectDBX？？？

gxnnmy27

在AutoCAD VBA 二次开发教程和VBA开发精彩实例教程中均有提到使用ObjectDBX技术，但ObjectDBX在CAD2002中总是提示“AcviteX剖件不能创建该对象”， 在这之前已引用了ObjectDBX COMMAND1。0类型库（CAD2002）。但就是出错如：

这是书中的代码

Private Sub UserForm_Initialize()
    ' 根据AutoCAD的版本来确定使用ObjectDBX的版本
    If Left(Version, 2) = "15" Then
        Set objDBX = CreateObject("ObjectDBX.AxDbDocument.1")   “总是在这行出错----本人加的”
    ElseIf Left(Version, 2) = "16" Then
        Set objDBX = CreateObject("ObjectDBX.AxDbDocument.16")
    End If

End Sub

我要网上找了几天了，都没找到，有些只是提到，但没有能解决，注册ObjectDBX也注册不了，怎么注册？？？？。如果注册成功也出错呢？？在CAD2006中是可以用，但本人只想在CAD2002中用，希望好心人帮帮忙，如何用ObjectDBX

gxnnmy27

按照书本上和光盘上的程式在CAD2002中加载DVB文件，运行宏都不得，但在CAD2006中可以使用，怎么样才能在2002中用？？这几本书和光盘不是白买了？？？