set oObject = Application.ActiveProject.ActiveScene.Root.AddGeometry("Sphere","NurbsSurface")
set oNurbsSurfaceMesh = oObject.ActivePrimitive.Geometry
set oUKnots = oNurbsSurfaceMesh.Surfaces(0).Knots(siUDirection)
aKnots = oUKnots.Array
for i = lbound( aKnots ) to ubound( aKnots )
logmessage aKnots(i)
next