Pauses for user input of an angle.
Rhino.GetAngleEx ([strPrompt1 [, strPrompt2 [, strPrompt3 [, dblAngle]]]])
Rhino.GetAngleEx (arrPlane, [, strPrompt2 [, strPrompt3 [, dblAngle]]])
Rhino.GetAngleEx (arrPlane, arrReference, [, strPrompt3 [, dblAngle]])
Rhino.GetAngleEx (arrCenter, [, strPrompt2 [, strPrompt3 [, dblAngle]]])
Rhino.GetAngleEx (arrCenter, arrReference, [, strPrompt3 [, dblAngle]])
strPrompt1 |
Optional. String. A prompt or message for the first point, which is the center, or base, point of the angle calculation. |
strPrompt2 |
Optional. String. A prompt or message for the second point, which is the first reference point of the angle calculation. |
strPrompt3 |
Optional. String. A prompt or message for the third point, which is the second reference point of the angle calculation. |
dblAngle |
Optional. Number. A default angle value specified in degrees. |
arrPlane |
Required. Array. The plane on which the angle calculation will be made. Note, the origin of the plane is the center, or base, point of the angle calculation. |
arrCenter |
Required. Array. The center, or base, point of the angle calculation. |
arrReference |
Required. Array. The first reference point of the angle calculation. |
Number |
The angle in degrees if successful. |
Null |
If not successful, or on error. |
Dim dblAngle
dblAngle = Rhino.GetAngleEx
If IsNumeric(dblAngle) Then
Rhino.Print "Angle: " & CStr(dblAngle)
End If