AnnGetRgnHandle example for Visual Basic

   LEAD2.SetRgnHandle LEAD1.AnnGetRgnHandle (hPlgn), 1, 1, L_RGN_SET
   LEAD2.RgnFrameType = RGNFRAME_ANIMATED