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