home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / msdos / pcmag / vol8n07.arc / STRING1.BAS < prev    next >
Encoding:
BASIC Source File  |  1988-09-25  |  132 b   |  8 lines
  1. DEFINT A-Z
  2. FOR i = 1 TO n
  3.   IF search$ = array$(i) THEN
  4.     PRINT search$; " found at element"; i
  5.     EXIT FOR
  6.   END IF
  7. NEXT
  8.