New Post: Noob question: how to retrieve X Y from pointshape

shapeActual=CType(FeatureSet.Open(path & nameShape & ".SHP"),FeatureSet)
shapeActual.FillAttributes()
For i As Integer=0 To shapeActual.Features.Count-1
    MsgBox(CStr(shapeActual.Features.Item(i).Coordinates.Item(0).X) & ";" & CStr(shapeActual.Features.Item(i).Coordinates.Item(0).Y))
Next