home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Toolbox / Visual Basic Toolbox (P.I.E.)(1996).ISO / lang_ext / vbawk / usercode.bas < prev    next >
Encoding:
BASIC Source File  |  1994-08-13  |  1.2 KB  |  38 lines
  1.  
  2. 'This routine is called after each file is closed and
  3. 'all processing for that file is finished.
  4. Sub AfterAFile ()
  5. End Sub
  6.  
  7. 'This routine is called at the very end of the program,
  8. 'after all files have been processed.
  9. Sub AfterAllFiles ()
  10. End Sub
  11.  
  12. 'The return value of BeforeAFile is usually True, which
  13. 'indicates that the current file is to be processed
  14. 'normally.  By returning False, you can skip processing
  15. 'the current file.
  16. Function BeforeAFile ()
  17.     BeforeAFile = True
  18. End Function
  19.  
  20. 'This routine is executed at the very beginning of the
  21. 'application, before any files are opened or any
  22. 'processing has taken place.  It normally returns True;
  23. 'if it returns False, the program terminates immediately
  24. 'without processing any files.
  25. Function BeforeAllFiles () As Integer
  26.     BeforeAllFiles = True
  27. End Function
  28.  
  29. 'This routine called over and over, each time being
  30. 'passed a succeeding line of the file being
  31. 'processed.  Or, in binary mode, this routine is passed
  32. 'a chunk of bytes as long as RECLEN, except for the
  33. 'final chunk which may be smaller than RECLEN.
  34. Function DoALine (TheLine As String) As Integer
  35.     DoALine = True
  36. End Function
  37.  
  38.