Jeff,
Thank you. I was able to add catch statement and it worked like a charm after reading about 20 pages on on code project on the subject.
Thanks
John
For Each myPointID As ObjectId In ss
Try
Dim myPoint As CogoPoint = myPointID.GetObject(OpenMode.ForRead)
mySW.WriteLine(myPoint.PointNumber & "," & myPoint.Location.X.ToString & "," & myPoint.Location.Y.ToString & "," & myPoint.Location.Z.ToString & "," & Left(myPoint.FullDescription, 15))
ElevationOnSurface = surface.FindElevationAtXY(myPoint.Location.X, myPoint.Location.Y)
MsgBox(ElevationOnSurface)
doing more stuff with points
Catch ex As Autodesk.Civil.PointNotOnEntityException
ed.WriteMessage(ex.Message + Convert.ToChar(10))
End Try
Next