home *** CD-ROM | disk | FTP | other *** search
/ The Houseplan Collection / HRCD2005.ISO / data1.cab / Zusatz / 3DS / DATA2.Z / Tools.bas < prev    next >
BASIC Source File  |  1998-03-11  |  272b  |  14 lines
  1. Attribute VB_Name = "Tools"
  2. Option Explicit
  3.  
  4. Public Sub TerminateAll()
  5.     Dim f As Object
  6.     ' Falls noch Forms geladen sind, k÷nnen die jetzt entsorgt werden
  7.     For Each f In Forms
  8.         Unload f
  9.     Next
  10.     ' Und jetzt alles anhalten
  11.     End
  12. End Sub
  13.  
  14.