Description
Creates a new, empty Points Collection object.
Syntax
Visual Basic |
---|
Public Function CreatePoints() As Points |
Remarks
The CreatePoints method should not be confused with the CreatePoint method, which is used to create a single Point object, or the AddPointEntity method, which is used to create a point that is visible on the screen.
Example
Private Sub CreatePoints_Example()
Dim myDoc As IntelliCAD.Document
Dim myPoints As Points
Dim pt As Point
Set myDoc = ActiveDocument
Set myPoints = Library.CreatePoints
Set pt = Library.CreatePoint(7, 2, 3)
myPoints.Add
myPoints(myPoints.Count - 1).x = pt.x
myPoints(myPoints.Count - 1).y = pt.y
myPoints(myPoints.Count - 1).z = pt.z
End Sub