New Post: Use Option Strict On ?

        Dim oshapes As Object
        Dim shapes() As Integer

            If .SelectShapes(ext, 0.0, MapWinGIS.SelectMode.INTERSECTION, oshapes) Then
                shapes = CType(oshapes, Integer())