home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 1_2002.ISO / Data / Zips / CODE_UPLOAD14512242001.psc / modMain.bas < prev    next >
Encoding:
BASIC Source File  |  2000-10-26  |  224 b   |  15 lines
  1. Attribute VB_Name = "modMain"
  2. Sub CloseMenus()
  3. While frmMain.picmain.Height <> "255"
  4. frmMain.picmain.Height = frmMain.picmain.Height - 1
  5. Wend
  6. End Sub
  7.  
  8. Sub EndApp()
  9. Unload frmMain
  10. Unload frmBrowse
  11. End
  12. End Sub
  13.  
  14.  
  15.