Import的调用

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

代码如下：
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（）

Import的调用

发表回复

精选推荐