AnnSetSecondaryBitmap example for Visual Basic

   LEAD1.AnnSetSecondaryBitmap hPushPin, LEAD2.Bitmap, False
   LEAD1.AnnUserMode = ANNUSERMODE_RUN
   MsgBox "secondary bitmap set"
   LEAD1.Bitmap = LEAD1.AnnGetSecondaryBitmap (hPushPin)