Can anybody help?

I need a VBA macro that can do the following....

1] Check to see if the sketch only contains two circles, NO OTHER ENTITIES (Lines/Arcs etc)

2] Show the diameters of each circle in a msgbox

This is for testing purposes

Many thanks in advance!!!

Darren