两个错误！请教。。

galayan · 发表于 2005-4-26 14:32:00

用VB开发ACAD中，我想在ACAD中打开或建立一图形，程序如下： Dim dwgname As String
dwgname = "d:\示列图\示列图1.dwg" '图已存在
If Dir(dwgname) <> "" Then
acadapp.Documents.OPEN dwgname
Else
'否则以acad.dwt为模板建立一个新文件
acadapp.Documents.Add "acad.dwt"
End If 为什么会出现以下两个错误：
（1）在运行OPEN和Add语句时，会出现“变量未定义”的错误？
（2）我在模块中已对acadapp定义为：Public acadapp As AcadApplication
为什么还会出现“ambiguous name detected:acadapp”的错误？

tttmmm · 发表于 2005-4-26 16:54:00

是否用了"Getobject"语句将VB和CAD联接?

galayan · 发表于 2005-4-26 18:44:00

用了

而且可以确保VB与AutoCAD已经链接！

还是会出现这样的错误

雪山飞狐_lzh · 发表于 2005-4-26 20:34:00

这一点代码没问题，可能是没有实例化acadapp

kirven · 发表于 2005-4-26 21:22:00

搞定了吗？

zhumb · 发表于 2005-4-26 22:54:00

是不是没有用set语句给acadapp赋值啊？

galayan · 发表于 2005-4-27 08:37:00

我再去试试

谢谢指点

账号		自动登录	找回密码
密码			注册