Import的调用
<p>代码如下:</p><p>On Error GoTo errHdl<br/> Dim varPt(2) As Double<br/> varPt(0) = 0<br/> varPt(1) = 0<br/> varPt(2) = 0<br/> Dim dblS As Double<br/> dblS = 1<br/> Dim strFile As String<br/> strFile = "C:\00\1.dwg" '如果我将文件存为DXF格式,这里就正确了<br/> ThisDrawing.Import strFile, varPt, dblS<br/> <br/>errHdl:<br/> MsgBox Err.Description</p><p></p><p>如果是DWG格式,提示“参数无效”,但插入dxf就没有问题。请问这是什么原因?</p> <p>如果要插入.dwg文件,请用ThisDrawing.ModelSpace.InsertBlock()</p>
页:
[1]