Public Function New( _
   ByVal in_cover As Object, _
   ByVal out_cover As Object, _
   ByVal cell_size As Double, _
   ByVal distance As Double _
)

Dim in_cover As Object
Dim out_cover As Object
Dim cell_size As Double
Dim distance As Double
 
Dim instance As New AggregatePolygons(in_cover, out_cover, cell_size, distance)

public AggregatePolygons( 
   object in_cover,
   object out_cover,
   double cell_size,
   double distance
)