请大家帮助分析一下
在VB中有如下程序Dim AcadDoc As AcadDocument
On Error Resume Next
Set ACADApp = CreateObject("autocad.application")
If Err Then
MsgBox ("无法运行AutoCAD，请检查是否正确安装了AutoCAD！")
Unload Me
Exit Sub
End If
ACADApp.WindowState = acMax
ACADApp.Application.Documents.Open "C:\user.dwg"
Set AcadDoc = ACADApp.Application.ActiveDocument
AcadDoc.ModelSpace.Layout.ConfigName = "user.pc3"
AcadDoc.ModelSpace.Layout.StyleSheet = "user.ctb"
configname和stylesheet总是设置不成功，而在CAD的VB编辑器中却可以
ThisDrawing.ModelSpace.Layout.ConfigName = "user.pc3"
ThisDrawing.ModelSpace.Layout.StyleSheet = "user.ctb"
为什么？请大家指点。谢谢！！！ 我在以前的贴子里已经提示过，在更改这些配置前应该对配置进行刷新，这样才不会出错。
使用RefreshPlotDeviceInfo 属性进行刷新。
http://www.mjtd.com/object/acad2004/idh_refreshplotdeviceinfo.htm
页:
[1]