IBM Lotus Symphony
|
Ретпен орналасқан ашық файлдан деректерлі оқиды.
Енгізу #FileNumber бүтін сан ретінде; var1[, var2[, var3[,...]]]
FileNumber: оқығыңыз келетін деректері бар файл. Файл қосу сөзін пайдаланып ашу нұсқауымен бірге ашылауы тиіс.
var: Ашық файлдан мәндердің оқылуын тағайындаған айналмалы сан немесе жол.
Input# нұсқауы ашық файлдан сандық мәндерді немесе жолдарды оқиды және бір немесе бірнеше айналмалылар үшін деректерді тағайындайды. Сандық айналмалы мән бірінші жылжымайтын қайтару (Asc=13) оқылды, жол веб арнасы (Asc=10), бос орын немесе үтір. Жол айналмалы мәні бірінші жылжымайтын қайтаруды (Asc=13) оқыды, жол веб арнасы (Asc=10) немесе үтір.
Ашық файлдың дерерктері мен деректер түрі "айнал" параметрінде берілгендей ретте пайда болуы тиіс. Егер сандық айналмалы мәнге сандық емес мәнді тағайындасаңыз, "айнал" параметрі 0 мәнін тағайындайды.
Үтірмен бөлінген жазулар жол айналмалы мәніне тағайындалмайды. Файлдағы тырнақша белгісі (") еленбейді. Таңбадарды файлдан оқығыңыз келсе Line Input# нұсқауы statement таза мәтіндің файлды жолдан жолға оқу үшін (басып шығарылатын таңбалары бар файлдар).
Деректер элементін оқу барысында файл бітсе қате пайда болады және үрдіс үзіледі.
ExampleWorkWithAFile нұсқауы
iNumber функциясын бүтін сан ретінде қарайту
sLine жолын жол ретінде қарайту
Жол ретінде aFile қарайту
sMsg жол ретінде қарайту
aFile = "c:\data.txt"
iNumber = Freefile
#iNumber ретінде шығару үшін aFile ашу
#iNumber басып шығару, "Бұл — мәтін жолы"
Басып шығару #iNumber, "Мәтіннің басқа жолы"
Close #iNumber
iNumber = Freefile
iNumber сияқты шығару үшін, файлды ашу
eof(iNumber) емес
Жолды енгізу #iNumber, sLine
Егер sLine <>"" болса, онда
sMsg = sMsg & sLine & chr(13)
болса аяқтаңыз
бағыттану
Close #iNumber
Msgbox sMsg
Аяқталу ішкі элементі