AnnSetWnd Example for Visual Basic

   LEAD1.AnnSetWnd hPlgn, oldWnd
   Dim oldWnd As Long
   oldWnd = RasterAnn.AnnGetWnd (hPlgn)
   RasterAnn.AnnSetWnd hPlgn, Command1.hWnd
   RasterAnn.AnnSetVisible hPlgn, False, 0, 0
   RasterAnn.AnnSetVisible hPlgn, True, 0, 0
   MsgBox "will restore old window"
   RasterAnn.AnnSetWnd hPlgn, oldWnd