Usted buscó: inumber (Polaco - Inglés)

close #inumber
close #inumber

seek #inumber,2
seek #inumber,2

get #inumber,,stext
get #inumber,,stext

print lof(#inumber)
print lof(#inumber)

dim inumber as integer
dim inumber as integer

line input #inumber, sline
line input #inumber, sline

put #inumber,,"to jest nowy tekst"
put #inumber,,"this is new text"

print #inumber, "to jest linia tekstu"
print #inumber, "this is a line of text"

put #inumber,, "to jest trzecia linia tekstu"
put #inumber,, "this is the third line of text"

print #inumber, "to jest kolejna linia tekstu"
print #inumber, "this is another line of text"

put #inumber,20,"to jest tekst w rekordzie 20"
put #inumber,20,"this is the text in record 20"

msgbox fileattr(#inumber, 2 ),0,"atrybuty pliku"
msgbox fileattr(#inumber, 2 ),0,"file attribute"

put #inumber,, "to jest pierwsza linie tekstu" rem wypełnij tekstem
put #inumber,, "this is the first line of text" rem fill with text