iCAx开思网

标题: 【求助】sw用vb求草图面积 [打印本页]

---

作者: hlp    时间: 2002-6-27 11:12
标题: 【求助】sw用vb求草图面积
下载https://www.solidworks.com/downloads/API/Downloads/00000/0100s/0115/Face_GetArea.zip，解压后得到一个求sw中3d实体表面积的vb程序。打开sw的part文档，在vb6中执行这个程序，可以得到三维实体的表面积，但是这个程序无法计算选定草图的面积。
  
我试着写了一段程序，希望能够对选中的草图计算面积。
*****
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swPart As SldWorks.PartDoc
Dim vBody As Variant
Dim swBody As SldWorks.body2
Dim swFace As SldWorks.face2
Dim nArea As Double
  
Sub main()
    
Set swApp = CreateObject("SldWorks.Application")
Set Part = swApp.ActiveDoc
Set swPart = swModel
Part.SelectByID "草图1", "SKETCH", 0, 0, 0 '选中草图1
nArea = swFace.GetArea
End Sub
*****
但是执行时提示错误。请高手指点。

---

作者: pobandeng    时间: 2002-6-30 09:43
哈哈，草图对象没有GetArea的方法。你运行当然就出错了。你还是看一下SW的API帮助文档吧

---

欢迎光临 iCAx开思网 (https://www.icax.org/)

Powered by Discuz! X3.3