home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / tinydb / tinytst.ba_ / tinytst.ba
Encoding:
Text File  |  1997-12-03  |  255 b   |  19 lines
  1. Attribute VB_Name = "Module1"
  2. Global MyDB As New TinyDB
  3.  
  4. Global cancelflag As Integer
  5. Global comm7down As Integer
  6. Global comm6down As Integer
  7.  
  8. Sub glass()
  9. Form1.MousePointer = 11
  10. End Sub
  11.  
  12.  
  13.  
  14. Sub regular()
  15. Form1.MousePointer = 0
  16. End Sub
  17.  
  18.  
  19.