home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 4 Unleashed / Visual_Basic_4_Unleashed_SAMS_Publishing_1995.iso / source / chap20 / scalcb.bas < prev    next >
Encoding:
BASIC Source File  |  1995-09-21  |  282 b   |  17 lines
  1. '------------
  2. ' SCALCB.BAS
  3. '------------
  4.  
  5. DECLARE FUNCTION SimpleCalc% CDECL(BYVAL Parm1%, BYVAL Parm2%)
  6.  
  7. DIM Parm1 AS INTEGER
  8. DIM Parm2 AS INTEGER
  9.  
  10. INPUT Parm1
  11. INPUT Parm2
  12.  
  13. PRINT "In BASIC, going into C..."
  14. PRINT SimpleCalc (Parm1, Parm2)
  15. PRINT "Back into BASIC!"
  16.  
  17.