home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_1 / FOCUS002 / FOC001G.BAS < prev    next >
Encoding:
BASIC Source File  |  1992-05-11  |  514 b   |  17 lines
  1. Global ngVerifyOK As Integer
  2. Global ngCtlFocusID As Integer
  3. Global ngSaveLRValue As Integer
  4. Global ngSaveListIndex As Integer
  5. Global ngNumberOfCtls As Integer
  6. Global ngSaveOptValues(0 To 3) As Integer
  7. Global ngSaveChkBoxValues(0 To 3) As Integer
  8. Global ngOptsAndChkBoxesJustReset As Integer
  9. Global Const TRUE = -1
  10. Global Const FALSE = 0
  11. Global Const UNCHECKED = 0
  12. Global Const CHECKED = 1
  13. Global Const GRAYED = 2
  14. Global Const MSG_STOP_OK = 17  ' STOP + OK
  15. Global Const MSG_WARNING = 48  ' WARNING
  16.  
  17.