spirit_sw 发表于 2004-2-17 09:35:00

vb和CAD链接问题！很奇怪的问题，请大侠看看

我的VB程序本来用下面的子过程链接CAD用的好好的，不过最近这段时间一直链接不上，VB总提示“部件要求挂起，请稍后再试”。这是什么原因啊，在别人电脑上都是好好的，这跟系统有关系吗？除了重装系统还有其他办法吗？请各位大侠帮忙看看：


Public Sub subAcdInit()<BR>                       Dim i As Integer<BR>                       Dim sDwg As String<BR>                       Dim myDoc As AcadDocument<BR>                                               <BR>                       On Error Resume Next<BR>                                                                                               <BR>                       Set myAutoCAD = GetObject(, "Autocad.Application")<BR>                       If Err Then<BR>                                                       Err.Clear<BR>                                                       Set myAutoCAD = CreateObject("Autocad.Application")<BR>                                                       myAutoCAD.Visible = True<BR>                                                       <BR>                                                       If Err Then<BR>                                                                                       MsgBox Err.Description<BR>                                                                                       Exit Sub<BR>                                                       End If<BR>                                                       <BR>                       End If<BR>End Sub

myfreemind 发表于 2004-2-17 18:02:00

那可能是因为你autocad这边还有命令在执行，多按几下ESC键！！

sooma 发表于 2004-4-2 09:20:00

你没有定义“myAutoCAD”变量。
页: [1]
查看完整版本: vb和CAD链接问题！很奇怪的问题，请大侠看看