robbin840311 发表于 2010-5-20 20:34:00

Import的调用

代码如下:
On Error GoTo errHdl
Dim varPt(2) As Double
varPt(0) = 0
varPt(1) = 0
varPt(2) = 0
Dim dblS As Double
dblS = 1
Dim strFile As String
strFile = "C:\00\1.dwg"             '如果我将文件存为DXF格式,这里就正确了
ThisDrawing.Import strFile, varPt, dblS

errHdl:
MsgBox Err.Description
如果是DWG格式,提示“参数无效”,但插入dxf就没有问题。请问这是什么原因?

coolway 发表于 2010-5-21 15:24:00

如果要插入.dwg文件,请用ThisDrawing.ModelSpace.InsertBlock()
页: [1]
查看完整版本: Import的调用