Try this:
With nameoflabelcontrol
Me.Circle (.Left+.Width/2, .Top+.Height/2), .Width/2+50, _
vbBlack, , , 0.4
End With
Play around with the 50 and the 0.4 to get it to look nice.
The 50 is sort of a margin and the 0.4 makes a medium
flattened ellipse (1.0 makes a circle).
If you want to change the width of the line, use:
Me.DrawWidth = 10 ' or some smallish number
before the above lines.