Cuting and pasting radius shape

Hello.

I'm developing an application using Visual Basic 6 and Mappoint 2002.

I define a Radius shape:

Dim radio As MapPoint.Shape
Set radio = oMap.Shapes.AddShape(geoShapeRadius, chinchetas(0).Location, 0.2, 0.2)

chinchetas is an array of Pushpins.

If the user moves the radius, there is no problem. But, if he cuts the shape and pastes it, then, when I try to access radio.Location, I get the runtime error:

'-2147467259 (80004005)' Unspecified error.

What's the problem? How could I avoid this problem?

By the way, when I paste the radius, it's pasted in the same point where it was cut, I don't know why.

Thanks a lot in advance.