Public Function EndGetAreasAndLengths( _
   ByVal asyncResult As IAsyncResult, _
   ByRef Lengths As Double _
) As Double()

Dim instance As GeometryServerProxy
Dim asyncResult As IAsyncResult
Dim Lengths As Double
Dim value() As Double
 
value = instance.EndGetAreasAndLengths(asyncResult, Lengths)

public double[] EndGetAreasAndLengths( 
   IAsyncResult asyncResult,
   out double Lengths
)