DigiNG edición Scripting

Método Angulo

Devuelve el ángulo en radianes que forma el objeto con otro Objeto Point.

objeto.Angulo (punto)

Argumentos

punto

        Objeto Point con el que medir el ángulo.

Ejemplo

Dim pt1

Dim pt2

Dim angulo

Set pt1 = CreateObject("Digi3D.Point")

Set pt2 = CreateObject("Digi3D.Point")

pt1.x = 100

pt1.y = 100

pt2.x = 12

pt2.y = 26

angulo = pt1.Angulo(pt2)

Mirar también

Objeto Point

Fecha de última modificación: domingo, 9 de diciembre de 2001

© 2001-2002 Dreaming With Objects. Todos los derechos reservados.