Dim objDrawingSpace As New DrawingSpace.DrawingSpace
Dim entObject1 As Entity
Dim entObject2 As Entity
Dim acadDB As Database = HostApplicationServices.WorkingDatabase
Dim acadTrans As Transaction = acadDB.TransactionManager.StartTransaction
entObject1 = objDrawingSpace.GetEntity("Select Object 1", acadTrans)
entObject2 = objDrawingSpace.GetEntity("Select Object 2", acadTrans)
Dim colIntersection As New Point3dCollection
entObject1.IntersectWith(entObject2 , Intersect.OnBothOperands, colIntersection, 1, 1)
MsgBox(colIntersection.Count)
objDrawingSpace.GetEntity is a function that just prompts a message to the command line and returns the object selected by the user. I've tried different scenarios, like a drawing a line and then drawing a polyline zigzagging over it, still returns only 1 intersection even though there were really 10. I'm using Autocad 2006 and Visual Studio 2005