AutoCAD文件的备份问题
我想在对文件处理前做一个备份,代码如下(在vb中):
Dim docsObj As AcadDocuments
Dim docTemp As AcadDocument
Dim docObj As AcadDocument
Dim spaceObj As AcadBlock
Dim returnObj As Acad3DSolid
Dim temp3Dsolid As Acad3DSolid
''''''''''''''''''''''''''
'docObj是当前文档对象,returnObj是docObj中的一个3D对象
'set spaceObj = docObj
'对象的赋值对没问题,只是下面的代码不能得到我想要的结果
''''''''''''''''''''''''''
Set docTemp = docsObj.Add
Set temp3Dsolid = spaceObj.CopyObjects(returnObj, docTemp.ModelSpace)
'我想应该在新建的文档里有returnObj对象,可结果什么也没有
'各位高手给我看看,先谢谢了!!!
Re: AutoCAD文件的备份问题
问题在这一句:Set temp3Dsolid = spaceObj.CopyObjects(returnObj, docTemp.ModelSpace)。首先CopyObjects应该是文档对象的方法,spaceObj应是AcadDocument对象,然后看看它的传递参数,第一个参数Objects应该是对象的数组,应而returnObj应该声明为Dim returnObj(0) As Acad3DSolid,然后对其赋值。最后,看看返回值RetVal,它也是对象的数组,故应声明为Dim temp3Dsolid As Variant。
谢谢,我现试试看
我是第一次来这里也是第一次用AutoCAD和vb
有问题我再来麻烦你
搞定了
OK,谢谢喽!!
页:
[1]