I have an array define with:
Dim newPoints() As PolyPoint
PolyPoint is a user defined type that stores the X and Y values of a point in the cartesian plane.
I Redimension the the array with:
ReDim newPoints(1 To 2 * UBound(anotherArray))
I add to the array with a loop as follows:
Count = 1
For i = 1 To UBound(anotherArray)
For j = 1 To aCollection.Count - 1
newY = anotherValue
Set newPoints(Count) = New PolyPoint
newPoints(Count).X = xValue
newPoints(Count).Y = newY
Count = Count + 1
Next j
Next i
After this operation I get the Object Variable etc. Error when I try the use the values in newPoints:
divList = divList + ", " & newPoints(1).X
I would appreciate any help to get past this error. I think I might have set my array incorrectly but I am not sure.
Thanks
Dim newPoints() As PolyPoint
PolyPoint is a user defined type that stores the X and Y values of a point in the cartesian plane.
I Redimension the the array with:
ReDim newPoints(1 To 2 * UBound(anotherArray))
I add to the array with a loop as follows:
Count = 1
For i = 1 To UBound(anotherArray)
For j = 1 To aCollection.Count - 1
newY = anotherValue
Set newPoints(Count) = New PolyPoint
newPoints(Count).X = xValue
newPoints(Count).Y = newY
Count = Count + 1
Next j
Next i
After this operation I get the Object Variable etc. Error when I try the use the values in newPoints:
divList = divList + ", " & newPoints(1).X
I would appreciate any help to get past this error. I think I might have set my array incorrectly but I am not sure.
Thanks