UBound of PointCollection

[sgrya1]

How do I retrieve the UBound point of a point collection

Dim PointCollection As New Point3dCollection()

Dim Point1 As Point3d

Point1 = New Point3d(UBound(PointCollection).x, UBound(PointCollection).y, 0)

[chiefbraincloud]

PointCollection.Count - 1

[sgrya1]

Got it. Thanks.

Point1 = PointCollection.Item(PointCollection.Count - 1)