home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 February / PCWK0296.iso / sharewar / win31x / program / liberty / examples.shr / INVOICE.BAS < prev    next >
Encoding:
BASIC Source File  |  1992-08-23  |  957 b   |  34 lines
  1.  
  2.  
  3.     ' open a spreadsheet for invoice entry
  4.     nomainwin
  5.     WindowWidth = 450
  6.     open "Invoice Form" for spreadsheet as #1
  7.  
  8.     print #1, "indirect"
  9.     print #1, "select B5"
  10.     print #1, "format D fixed"
  11.     print #1, "cell A1 'INVOICE for services and merchandise:"
  12.     print #1, "cell B4 '================================="
  13.     print #1, "user B5 string"
  14.     print #1, "user B6 string"
  15.     print #1, "user B7 string"
  16.     print #1, "user B8 string"
  17.     print #1, "user B9 string"
  18.     print #1, "user D5"
  19.     print #1, "user D6"
  20.     print #1, "user D7"
  21.     print #1, "user D8"
  22.     print #1, "user D9"
  23.     print #1, "cell B10 '================================="
  24.     print #1, "cell A11 'Total"
  25.     print #1, "cell D11 d5 d6 d7 d8 d9 sum"
  26.     print #1, "cell B12 '================================="
  27.     print #1, "cell A13 '+ 5% Tax"
  28.     print #1, "cell D13 d11 * 1.05"
  29.     print #1, "flush"
  30.  
  31.     input r$
  32.  
  33.     close #1
  34.