Module
Contents
Index 🔎︎

# Erl Function

ལས་རིམ་ལག་ལེན་འཐབ་པའི་སྐབས་འཛོལ་བ་འབྱུང་ཡོད་པའི་གྱལ་ཨང་དེ་སླར་ལོགཔ་ཨིན།

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

    Erl

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

ཧྲིལ་ཨང་།

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

ཨི་ཨར་ཨེལ་ལས་འགན་གྱིས་གྱལ་ཨང་རྐྱངམ་ཅིག་སླར་ལོགཔ་དང་གྱལ་ཁ་ཡིག་མེན།

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

    Sub ExampleError
    འཛོལ་བ་གུ་འཛོལ་བ་ལེགས་སྐྱོང་པ་ རིམ་གཞི་སྒྲིག་འཛོལ་བ་ལེགས་སྐྱོང་པ་ལུ་འགྱོ།
    Dim iVar As Integer
    Dim sVar As String
    གནས་པ་མེན་པའི་ཡིག་སྣོད་རྒྱུ་རྐྱེན་གྱིས་འཛོལ་བ་ཨར་ཨི་ཨེམ།
        iVar = Freefile
        Open "\file9879.txt" For Input As #iVar
        Line Input #iVar, sVar
        Close #iVar
        Exit Sub
    ErrorHandler:
        འཕྲིན་དོན་སྒྲོམ "Error " & err & ": " & error$ + chr(13) + "In line : " + Erl + chr(13) + Now , 16 ,"An error occurred"
    End Sub