LibreOffice 7.1 Help
Fa'nantino fayle bikka bayitetenni qolanno.
Lof (FayleteKiiro)
Seeda
FayleteSu'ma: Fani fooliishsho giddo badantino faylete kiiro amaddanno kiirote handaara.
Ea'nantinokki fayle seendille afirate,FayleLen assishsha horonsi'ri.
Sub ExampleRandomAccess
Dim iNumber As Integer
Dim sBorro Baxxaancho REM gede Baxxaancho ikka hasiisannosi
Dim aFile As String
aFile = "c:\data.txt"
iNumber = Freefile
Open aFile For Random As #iNumber Len=32
#iKiiro la'i,1 REM ofolla hanafote
#iKiiro wori,, "Kuni umi borrote xuuraati" REM Borrotenni wonshshi
#iKiiro wori ,, "Kuni layinkki borrote xuuraati"
#iKiiro wori,, "Kuni sayikki borrote xuuraati"
Seek #iNumber,2
Get #iNumber,,sText
Print sText
Close #iNumber
iNumber = Freefile
Open aFile For Random As #iNumber Len=32
Get #iNumber,2,sText
#iKiiro wori,, "Kuni haaro borrote xuuraati"
Get #iNumber,1,sText
Get #iNumber,2,sText
#iKiiro wori,20,"Tini 20 maareekko giddo noo borrooti"
Print Lof(#iNumber)
Close #iNumber
End Sub