◄Example►                ◄Contents►  ◄Index►  ◄Back►
──────────────────────────────────────────────────────────────────────────────
' This example demonstrates the use of the LOC function, the SEEK function,
' and the SEEK statement.
 
' To try this example:
' 1. Choose New Project from the File menu
' 2. Copy the code example below to the code window
' 3. Press F5 to run the example
 
 OPEN "TEST.DAT" FOR RANDOM AS #1
 FOR i% = 1 TO 10
     PUT #1, , i%
 NEXT i%
 SEEK #1, 2
 GET #1, , i%
 PRINT "Data: "; i%; " Current record: "; LOC(1); " Next: "; SEEK(1)