Module
Contents
Index 🔎︎

# Lof Function

Fa'nantino fayle bikka bayitetenni qolanno.

## Ganallo:

    Lof (FayleteKiiro)

## Qolote guma:

Seeda

## Eishsha:

FayleteSu'ma: Fani fooliishsho giddo badantino faylete kiiro amaddanno kiirote handaara.

Ea'nantinokki fayle seendille afirate,FayleLen assishsha horonsi'ri.

## Error codes:

5 Horiweelo aante woshsho

52 Horiweelo faylete su'ma woy faylete kiiro

## Lawishsha:

    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