Contents
Index 🔎︎

# Lof Function

བཱའིཊིསི་ནང་ཡིག་སྣོད་ཀུན་གྱི་ཚད་འདི་སླར་ལོགཔ་ཨིན།

## ཚིག་སྦྱོར:

    ཨེལ་གྱི་ (FileNumber)

## གནས་གོང་སླར་ལོག:

རིངམོ།

## ཚད་བཟུང་ཚུ་:

གསལ་བཤད་ཁ་ཕྱེ།

ཡིག་སྣོད་ཀྱི་རིང་ཚད་འདི་ལེན་ནི་ལུ་ཁ་མ་ཕྱེ་བ་ཅིན་ ཡིག་སྣོད་ལིན ལས་འགན་ལག་ལེན་འཐབ།

## Error codes:

༥ ནུས་མེད་བྱ་སྒོའི་ལམ་ལུགས་བོད་བརྡ་

༥༢ བྱང་ཉེས་ཡིག་སྣོད་མིང་ཡང་ན་ཨང་གྲངས་

## དཔེར་བརྗོད:

    Sub ExampleRandomAccess
    Dim iNumber As Integer
    མདངས་གྲིབ་ཨེསི་ཚིག་ཡིག་མི་མཐུན་པ་བཟུམ་སྦེ་ཨར་ཨི་ཨེམ་དེ་མི་མཐུན་པ་དགོཔ་ཨིན།
    Dim aFile As String
        aFile = "c:\data.txt"
        iNumber = Freefile
        Open aFile For Random As #iNumber Len=32
        #ཨའི་ཨང་ ༡་ རིམ་གནས་ས་འགོ་བཙུགས་ལུ།
        #ཨའི་ཨང་བཙུགས "This is the first line of text" REM Fill with text
        བཙུགས#ཨའི་ཨང་ "This is the second line of text"
        བཙུགས #ཨའི་ཨང་ "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
        #ཨའི་ཨང་བཙུགས"This is a new line of text"
        Get #iNumber,1,sText
        Get #iNumber,2,sText
        བཙུགས#ཨའི་ཨང་ ༢༠ "This is the text in record 20"
        Print Lof(#iNumber)
        Close #iNumber
    End Sub