IBM Lotus Symphony


Príkaz Get [Runtime]

Načíta záznam z relatívneho súboru alebo postupnosť bajtov z binárneho súboru do premennej.

Pozrite si tiež: Príkaz PUT

Syntax:

Get [#] Číslo_súboru ako celé číslo, [Pozícia], Premenná

Parametre:

Číslo_súboru: Ľubovoľný celočíselný výraz, ktorý určuje číslo súboru.

Pozícia: Pre súbory otvorené v režime Random, je Pozícia číslo záznamu, ktoré chcete čítať.

Pre súbory otvorené v režime Binary, je Pozícia pozícia bajtu v súbore, kde začne čítanie.

Ak je Pozícia vynechaná, použije sa aktuálna pozícia alebo aktuálny dátový záznam súboru.

Premenná: Názov premennej pre načítanie. S výnimkou premenných objektov môžete použiť ľubovoľný typ premennej.

Príklad:

Sub ExampleRandomAccess

Dim iNumber As Integer

Dim sText As Variant REM Musí byť variant

Dim aFile As String

aFile = "c:\data.txt"

iNumber = Freefile

Open aFile For Random As #iNumber Len=32

Seek #iNumber,1 REM Pozícia na začiatku

Put #iNumber,, "Toto je prvý riadok textu" REM Vyplniť riadok textom

Put #iNumber,, "Toto je druhý riadok textu"

Put #iNumber,, "Toto je tretí riadok textu"

Seek #iNumber,2

Get #iNumber,,sText

Print sText

Close #iNumber

iNumber = Freefile

Open aFile For Random As #iNumber Len=32

Get #iNumber,2,sText

Put #iNumber,,"Toto je nový text"

Get #iNumber,1,sText

Get #iNumber,2,sText

Put #iNumber,20,"Toto je text v zázname 20"

Print Lof(#iNumber)

Close #iNumber

end sub


Spätná väzba na produkt | Ďalšia dokumentácia | Ochranné známky