forverd 发表于 2018-8-24 10:26:12

vs下的基于com的技术问题

            ....
          For Each layoutx In wb.Layouts
                If layoutx.Name <> "Model" And layoutx.Block.Count > 2 Then   '转换到布局下
                  activedoc.ActiveLayout = layoutx
                  pathname = "\标准图框.dwg"                                                 '相对路径
                  xref = activedoc.PaperSpace.AttachExternalReference(pathname, "标准图框", InsertPoint, 1, 1, 1, 0, False)
                  xref.Layer = "图框"
                  xref.Linetype = "CONTINUOUS"
                  xref.Update()
                End If
         Next
         ....
1、这是我的一段代码，在vs平台下开发基于com技术，代码运行到红色字体部分出现问题，源代码在vb6中运行正常

2、还有为什么在vs中输入关键字之后没有对cad对象的属性、方法的自动补充那？是我缺少对什么文件的引用吗？

3、粉色代码部分能否有其他的表达方式，因为不想每次都把layoutx切换成激活的布局，这样会降低速度，paperspace有没有paperspace.item(i)的属性那？

nslove44202489 发表于 2018-8-25 18:18:15

这个枚举要加全限定名称

forverd 发表于 2018-8-26 12:00:36

nslove44202489 发表于 2018-8-25 18:18
这个枚举要加全限定名称

你是说的第一条吗？要importsruntime ?

forverd 发表于 2018-10-9 09:38:37

问题还没有解决，有帮忙看下的吗

forverd 发表于 2019-3-29 11:41:01

有帮忙看下的吗？几个月了还是 没解决

nslove44202489 发表于 2019-4-14 15:05:14

给你发个sample吧，先引用以下命名空间
dll去sdk中引用

Imports Autodesk.AutoCAD.Interop.Common
Imports Autodesk.AutoCAD.Interop

Dim acadApp As AcadApplication = Application.AcadApplication

Private Thisdrawing As AcadDocument =Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.AcadDocument
页: [1]
查看完整版本: vs下的基于com的技术问题