vbdpss.hlp (Table of Contents; Topic list)
Article Q57354, Example 1
                                                 Contents  Index  Back
─────────────────────────────────────────────────────────────────────────────
                           Knowledge Base Contents  Knowledge Base Index
 
 How to Print Visual BASIC Video Screens to Epson Printers, Example
 
 Printing CGA Screen Modes 0 Through 2:
 
 The following program, DUMP.BAS, shows the preferred method to CALL
 hardware Interrupt 5 to perform a screen dump:
 
 To try this example in VBDOS.EXE:
 
   1. From the File menu, choose New Project.
   2. Copy the code example to the Code window.
   3. Press F5 to run the program.
 
 ' To run this program in the environment, you must invoke the
 ' environment with the /L switch to load the default Quick library:
 ' VBDOS.EXE /L for Visual Basic 1.0 for MS-DOS
 
 ' Use the following include file for Visual Basic 1.0 for MS-DOS:
    REM $INCLUDE: 'VBDOS.BI'
    DIM inary AS RegType
    DIM outary AS RegType
    CLS
    SCREEN 1
    PRINT "This goes to the printer"
    LINE (1,1)-(100,100)
    CALL interrupt (&H5, inary, outary)      ' Performs screen dump.