View Full Version : array of doubles with the coordinates of a line

2004-07-23, 10:27 PM
ElseIf (TypeOf objSel Is AutoCAD.AcadLine) Then
ReDim LElementos(5) As Double
Dim startpoint As Variant
Dim endpoint As Variant
startpoint = objSel.startpoint
endpoint = objSel.endpoint
Dim n As Integer
For n = 0 To 2
LElementos(n) = startpoint(n)
LElementos(n + 3) = endpoint(n)
Next n

this gimme error, i have tried a lot of ways of make an array of doubles with the coordinates of a line, just to give them the same treatment i do to coordinates of rest of elements

anyone know the way?

err, editing and corrected, there is no error, sorry

2004-07-26, 04:57 PM
In the interests of those that might read your post with a similar error, please post your solution.

2004-07-27, 07:00 PM
the code works, the error was because of the later trearment

2004-07-27, 08:45 PM
Thank you for clarifying that.