VB连CAD创建面域后,VB对面域面积的查询
在VB里面我用<br/> Dim orthodromesplineObj(0 To 3) As AcadEntity<br/>绘制了四条样条线,该四条曲线,只在端点有交点,形状相当于一个矩形,然后用<br/>Dim regionObj As AcadRegion <br/>Set regionObj = acadDoc.ModelSpace.AddRegion(orthodromesplineObj)<br/>对四条样条线,创建了面域,<br/>此时,在AUTOCAD里面,我可以查询到该面域的面积(用“list”命令)<br/>但是,在VB里我用下面的命令,却查询不到该面域的面积,Debug.Print regionObj.Area<br/>并且用了监视窗口,增加断点,得到的信息为:<br/>regionObj.Area=<对象变量或with块变量未设置><br/>研究了一个星期,还是搞定不了,请高手赐教啊<br/>谢谢 AddRegion 的返回值是面域数组而不是面域
页:
[1]