クリックした座標を中心に円ポリゴンを作成し、その円と交差している座標のアイテムを取得すればよい。 'クリックした座標を中心とした円 Dim strClickRectPolygon As String = String.Format("ST_SetSrid(Geometry(ST_Buffer(Geography(ST_MakePoint({0}, {…