' this example illustrates how to access the automation object for the 

' points of the cube polygon mesh.

CreatePrim "Cube", "MeshSurface"

set oSelList = GetValue("SelectionList")

set oItem = oSelList(0)

set oGeometry = oItem.obj

set o0DGeometry = oGeometry.Geometry0D