IBM Lotus Symphony


Stavek Get [izvajalno okolje]

Prebere zapis iz relativne datoteke ali zaporedje bajtov iz dvojiške datoteke v spremenljivko.

Glejte tudi: Stavek PUT

Skladnja:

Get [#] FileNumber As Integer, [Position], Variable

Parametri:

FileNumber: Katerikoli celoštevilski izraz, ki določa številko datoteke.

Position: Za datoteke, odprte v načinu Random (Naključno), je Position številka zapisa, ki ga želite prebrati.

Za datoteke, odprte v načinu Binary (Dvojiško), je Position bajtni položaj v datoteki, kjer se začne branje.

Če je Position odstranjen, se uporabi trenutni položaj ali trenutni podatkovni zapis datoteke.

Variable: Ime spremenljivke za branje. Uporabite lahko katerokoli vrsto spremenljivk, razen spremenljivk predmetov.

Primer:

Sub ExampleRandomAccess

Dim iNumber As Integer

Dim sText As Variant REM Must be a variant

Dim aFile As String

aFile = "c:\data.txt"

iNumber = Freefile

Open aFile For Random As #iNumber Len=32

Seek #iNumber,1 REM Position at beginning

Put #iNumber,, "This is the first line of text" REM Fill line with text

Put #iNumber,, "This is the second line of text"

Put #iNumber,, "This is the third line of text"

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,,"To je novo besedilo"

Get #iNumber,1,sText

Get #iNumber,2,sText

Put #iNumber,20,"To je besedilo v zapisu 20"

Print Lof(#iNumber)

Close #iNumber

end sub


Povratne informacije o izdelku | Dodatna dokumentacija | Blagovne znamke