出现错误err.number:429如何解决?
运行时错误‘429’,ACTIVEX部件不能创建对象。具体代码如下(环境vs2005):Imports Autodesk.AutoCAD.Interop
Imports Autodesk.AutoCAD.Interop.Common
Public Class Form1
Dim AcadApp As AcadApplication
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Call StartAutoCAD()
End Sub
Sub StartAutoCAD()
On Error Resume Next
AcadApp = GetObject(, "AcadApplication")
If Err.Number Then
MsgBox(Err.Number)
AcadApp = CreateObject("AcadApplication")
If Err.Number Then
Exit Sub
End If
End If
AcadApp.Visible = True
AppActivate(AcadApp.Caption) '显示AutoCAD界面
End Sub
有人遇到过吗?该如何解决?
AcadApp = GetObject(, "AutoCad.Application")【你的对象名称搞错了】
如果你用过VB开发CAD那么这个错误是绝对不应该犯的! 回复 chmenf087 的帖子
谢谢回答,我是第一学习开发CAD。可是对象名换成“AutoCad.Application”一样是错误429 回复 chmenf087 的帖子
谢谢你,问题解决了。“”里区分大小写,应该是“AutoCAD.Application”。
真诚的的谢谢你。
页:
[1]