mapobject 与 VC++

 Dim a As MapObjects2.Polygon
   Dim b As MapObjects2.Polygon
   Dim c As Object

Set c = b.Intersect(a)                  
If Not c Is Nothing Then    
If c.shapeType = MapObjects2.ShapeTypeConstants.moShapeTypePolygon Then  
                         
ElseIf c.shapeType = MapObjects2.ShapeTypeConstants.moShapeTypeRectangle Then

End If
这个在VC++中怎么实现呀