Returns the angle of an arc curve object.
Rhino.ArcAngle (strObject [, intIndex [, dblTolerance]])
strObject |
Required. String. The object's identifier. |
intIndex |
Optional. Number. If strObject identifies a polycurve object, then intIndex identifies the curve segment of the polycurve to query. |
dblTolerance |
Optional. Number. If the curve is not an arc curve object, then the tolerance used to determine whether or not the NURBS form of the curve has the properties of an arc. If omitted, Rhino's internal zero tolerance is used. |
Number |
The angle in degrees if successful. |
Null |
If not successful, or on error. |
Dim strObject, dblAngle
strObject = Rhino.GetObject("Select arc")
If Rhino.IsArc(strObject) Then
dblAngle = Rhino.ArcAngle(strObject)
Rhino.Print "Arc angle: " & CStr(dblAngle)
End If