在VB里面我用
Dim orthodromesplineObj(0 To 3) As AcadEntity
绘制了四条样条线,该四条曲线,只在端点有交点,形状相当于一个矩形,然后用
Dim regionObj As AcadRegion
Set regionObj = acadDoc.ModelSpace.AddRegion(orthodromesplineObj)
对四条样条线,创建了面域,
此时,在里面,我可以查询到该面域的面积(用“list”命令)
但是,在VB里我用下面的命令,却查询不到该面域的面积,Debug.Print regionObj.Area
并且用了监视窗口,增加断点,得到的信息为:
regionObj.Area=
研究了一个星期,还是搞定不了,请高手赐教啊
谢谢