遇到更奇怪的问题！我要吐血了！

wenyuan

很奇怪，原来做的程序在新的机器上面跑不起来。
我用VB做的一个R14的程序，本来在一台机器上面可以跑起来，但是放到其他机器上却执行不起来。
我就用R14帮助中提供的开启AutoCAD的方法，代码如下：
Dim myApp as AcadApplication
Dim myDoc as AcadDocument
On Error Resume Next
Set myApp = GetObject(, "AutoCAD.Application")
If Err Then
    Err.Clear
    Set myApp = CreateObject("AutoCAD.Application")
    If Err Then
        MsgBox Err.Description
        Exit Sub
    End If

End If

却出现了执行之后却跳出了提示：Type mismatch，实在不知道是怎么回事。我的系统是Windows 2000，不带任何SP包，编译工具为VB6.0英文版，不带SP包。

后来我在另一台机器上面又试验，又跑起来了。过了一会，还是这台机器，却又不行了！

希望高手解答！解除我的痛苦吧！

efan2000

一是机器上有多个版本的AutoCAD存在。
二是有些VB的组件缺少或者没有注册。

wenyuan

问题在于，我是在一个新的系统上面做的，只装了R14，而且在vb的环境下面。做了一个按钮，就是刚才我写的内容

efan2000

如果这台是开发机器的话，一般没有问题。如果要在其它机器上运行，最好先打包，再安装，而不是直接拷贝运行。因为有的机器没有VB的运行库，或者一些VB的组件版本不对都会造成问题。

zhaoguo

我把吐了若干升血后的收获告诉你吧，告诉你你还得吐血。

对于R14版的AutoCAD,必须用过宏或打开过VBA,你的vb程序才能连上。（没有任何资料
上介绍过，生气吧）。

解决办法：在AutoCAD命令行中，键入vbarun回车后，再取消。以后就没有问题了。

上一行是我编的的程序中的唯一帮助。r14的vba很不成熟，还是用2002以上版本吧。

wenyuan

楼上的，你救了我一命，大恩大德，多谢多谢！！！

zhaoguo

不必客气，欢迎交流