home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / vb_prgms / bars3 / globar.bas < prev    next >
BASIC Source File  |  1992-03-18  |  505b  |  20 lines
  1. Global PrintFlag$
  2. Global FontToUse$
  3. Global BarHeight$
  4. Global BetweenHeight$
  5. Global HorBetween$
  6. Global LabelsAcross$
  7. Global TOPMARGIN$
  8. Global LEFTMARGIN$
  9.  
  10.  
  11. Declare Function getprofilestring Lib "Kernel" (ByVal Sname$, ByVal Kname$, ByVal Def$, ByVal Ret$, ByVal Size%) As Integer
  12. Declare Function WRITEProfileString Lib "Kernel" (ByVal Sname$, ByVal Kname$, ByVal Istring$) As Integer
  13. Type SAVELABELS
  14. CODE As String * 20
  15. DESCRIPTION As String * 40
  16. End Type
  17. Global LABELS As SAVELABELS
  18.  
  19.  
  20.