བྱ་སྒོའི་ལམ་ལུགས་ཚུ་དང་ལས་འགན་ཚུ་ལག་ལེན་འཐབ་དོ།

Module
Contents
Index 🔎︎

# བཡ་སྒོའི་ལམ་ལུགས་ཚུ་དང་ལས་འགན་ཚུ་ལག་ལེན་འཐབ་དོ

འོག་གི་འདི་གིས་LibreOffice གཞི་རྟེན་ནང་ལུ་ལས་འགན་ཚུ་དང་བྱ་སྒོའི་ལམ་ལུགས་ཚུའི་གཞི་རྟེན་ལག་ལེན་འདི་འགྲེལ་བཤད་འབདཝ་ཨིན།

ཁྱོད་ཀྱིས་ཚད་གཞི་གསརཔ་ཅིག་གསར་བསྐྲུན་འབདཝ་ད་ LibreOffice གཞི་རིམ་རང་བཞིན་གྱིས་ འོག་མ་ "Main" བཙུགསཔ་ཨིན། འ་ནི་སྔོན་སྒྲིག་མིང་འདི་ལུ་གོ་རིམ་འདི་དང་ ཡང་ན་ LibreOffice གཞི་རིམ་ལས་འགུལ་གྱི་འགོ་བཙུགསཔ་ད་ལུ་འབད་དགོཔ་ག་ནི་ཡང་མེདཔ་ཨིན། ཁྱོད་ཀྱིས་འ་ནི་ འོག་མ་ བསྐྱར་མིང་ཉེན་མེདཔ་སྦེ་བཏགས་བཏུབ་ཨིན།

Some restrictions apply for the names of your public variables, subs, and functions. You must not use the same name as one of the modules of the same library.

བྱ་སྒོའི་ལམ་ལུགས་ཚུ་ (འོག་མ་ཚུ) དང་ལས་འགན་ཚུ་ (ལས་འགན་ཚུ) གིས་ལས་རིམ་གཏན་ཆིག་ཅན་གྱི་པིསི་ནང་ལུ་སོ་སོ་ཁ་ཕྱེལ་ཏེ་གིས་སྦེ་གཞི་བཀོད་སྤྱི་མཐོང་རྒྱུན་སྐྱོང་འབད་ནི་ནང་གྲོགས་རམ་འབདཝ་ཨིན།

བྱ་སྒོའི་ལམ་ལུགས་ཀྱི་ཁེ་ཕན་གཅིག་དང་ལས་འགན་ཚུ་ ཁྱོད་ཀྱིས་ཚར་གཅིག་ལས་ཀ་ཆ་ཤས་ཚུ་ནང་ན་ཡོད་པའི་ལས་རིམ་ཨང་རྟགས་གངོ་འཕེལ་འགྱོ་་ཡོདཔ་ཅིན་ ཁྱོད་ཀྱིས་འ་ནི་ཨང་རྟགས་གཞན་ལས་འགུལ་ནང་ལག་ལེན་འཐབ་བཏུབ་ཨིན།

## (ལས་འགན) ལས་འགན་ཚུ་དང་(འོག་མ) བྱ་སྒོའི་ལམ་ལུགས་ཚུ་ལུ་འགྱུར་ཅན་ལག་བརྒྱུད་འཐབ་ཨིན།

འགྱུར་ཅན་ཚུ་ལས་འགན་ཚུ་དང་་བྱ་སྒོའི་ལམ་ལུགས་ཚུ་གཉིས་ཆ་ར་་ལུ་ལག་བརྒྱུད་འཐབ་ཡོདཔ་ཨིན། འོག་མ་ཡང་་ན་ལས་འགན་འདི་ཚད་བཟུང་་ཚུ་རེ་བའི་དོན་ལུ་གསལ་བསྒྲགས་འབད་དགོཔ:

    Sub SubName(Parameter1 As Type, Parameter2 As Type,...)
    ལས་རིམ་ཨང་རྟགས།
    End Sub

འོག་མ་འདི་འོག་གི་ཚིག་སྦྱོར་་ལག་ལེན་འཐབ་མི་འདི་ལུ་སླབ་ཨིན:

    SubName(Value1, Value2,...)

ཚད་བཟུང་ཚུ་འོག་མ་ལུ་རྩིས་སྤྲོད་འབད་ཡོད་མི་འདི་གསལ་བཀོད་འབད་མི་འོག་མ་གསལ་བསྒྲགས་འབད་མི་ནང་ལུ་ཚུད་སྒྲིག་འབད་དགོ།

ལས་སྦྱོར་འདི་ཅིག་འཐདཔ་ལས་འགན་ཚུ་ལུ་འཇུག་སྤྱོད་འབདཝ་ཨིན། ཁ་སྐོང་ནང་ ལས་འགན་ཚུ་ཨ་རྟག་ར་ལས་འགན་འགྲུབ་འབྲས་ར་སླར་ལོགཔ་ཨིན། ལས་འགན་ཅིག་གི་འགྲུབ་འབྲས་འདི་ལས་འགན་མིང་འདི་ལུ་གནས་གོང་སླར་ལོག་འགན་སྤྲོད་ཀྱི་ངེས་འཛིན་འབདཝ་ཨིན།

    Function FunctionName(Parameter1 As Type, Parameter2 As Type,...) As Type
    ལས་རིམ་ཨང་རྟགས།
    FunctionName=Result
    End Function

ལས་འགན་འདི་འོག་གི་ཚིག་སྦྱོར་ལག་ལེན་འཐབ་མི་འདི་ལུ་སླབ་ཨིན:

    འགྱུར་ཅན་=ལས་འགན་མིང་(ཚད་བཟུང་ ༡  ཚད་བཟུང་ ༢...)

ཁྱོད་ཀྱིས་ཡང་ཆ་ཚང་ཁྱད་ཆོས་ཚང་མི་མིང་བྱ་སྒོའི་ལམ་ལུགས་ཡང་ན་ལས་འགན་བོད་ནི་ལུ་ལག་ལེན་འཐབ་བཏུབ:
དཔེ་མཛོད་ ཚད་གཞི་ མེཀརོ()
དཔེར་ན་ ཇིམ་མིཀསི་དཔེ་མཛོད་ནང་ལས་རང་བཞིན་ཚིག་ཡིག་མེཀརོ་བོད་ནི་དོན་ལུ་ འོག་གི་བརྡ་བཀོད་འདི་ལག་ལེན་འཐབ:
ཇིམ་མིཀསི་ རང་བཞིན་ཚིག་ཡིག་ གཙོབོ()

## གནས་གོང་ཡང་ན་གཞི་བསྟུན་གྱིས་སྦེ་འགྱུར་ཅན་ཚུ་རྩིས་སྤྲོད་འབད་དོ།

ཚད་བཟུང་འདི་ཚུ་འོག་མ་ཡང་ན་ལས་འགན་ནང་ལུ་གཞི་བསྟུན་ཡང་ན་གནས་གོང་གིས་སྦེ་རྩིས་སྤྲོད་འབད་བཏུབ། མ་གཏོགས་ཚད་བཟུང་འདི་ཨ་རྟག་ར་་གཞི་བསྟུན་གྱིས་སྦེ་རྩིས་སྤྲོད་འབདཝ་ཨིན། འ་ཕི་ཐབས་ཤེས་འོག་མ་ཡང་ན་ལས་འགན་གྱིས་ཚད་བཟུང་འཐོབ་ནི་དང་ལྷག་དི་དང་འདིའི་གནས་གོང་ལེགས་བཅོས་འབད་བཏུབ།

ཁྱོད་ཀྱིས་ཚད་བཟུང་ཅིག་གནས་གོང་གིས་སྦེ་རྩིས་སྤྲོད་འབད་ནི་ཨིན་པ་ཅིན་གཙོ་ཚིག་ "ByVal" འདི་ཚད་བཟུང་གི་གདོང་ཁ་འོག་མ་ཡང་ན་ལས་འགན་བོདཔ་ད་བཙུགས དཔེར་ན:

    Result = Function(ByVal Parameter)

འ་ནི་་གནད་དོན་ནང་ ཚད་བཟུང་གི་ནང་དོན་འདྲ་དང་པམ་འདི་ལས་འགན་འདི་གིས་ལེགས་བཅོས་མི་འབད་ལས་ཚུར་འདི་གིས་གནས་གོང་འདི་རྐྱངམ་ཅིག་ལེནམ་དང་ཚད་བཟུང་དེ་ཉིད་འདི་མེན།

## འགྱུར་ཅན་ཚུའི་འོས་སྐབས།

A variable defined within a SUB or FUNCTION, only remains valid until the procedure is exited. This is known as a "local" variable. In many cases, you need a variable to be valid in all procedures, in every module of all libraries, or after a SUB or FUNCTION is exited.

### འོག་མ་ཡང་ན་ས་འགན་གྱི་ཕྱི་ཁར་འགྱུར་ཅན་ཚུ་གསལ་བསྒྲགས་འབད་དོ།

    མདངས་གྲིབ་སྤྱི་ཁྱབ་ཝར་མིང་དབྱེ་བ་མིང་བཟུམ་སྦེ།

འགྱུར་ཅན་འདི་LibreOffice ལཱ་ཡུན་རིངམ་སྦེ་ཡོདཔ་ཅིག་ནུས་ཅན་ཨིན།

    མདངས་གྲིབ་མི་མང་ཝར་མིང་དབྱེ་བ་མིང་བཟུམ་སྦེ།

འགྱུར་ཅན་འདི་ཚད་བཟུང་ཆ་མཉམ་ནང་ལུ་ནུས་ཅན་ཨིན།

    མདངས་གྲིབ་མི་མང་ཝར་མིང་དབྱེ་བ་མིང་བཟུམ་སྦེ།

འགྱུར་ཅན་འདི་འ་ནི་ཚད་བཟུང་ནང་རྐྱངམ་ཅིག་ནུས་ཅན་ཨིན།

    མདངས་གྲིབ་མི་མང་ཝར་མིང་དབྱེ་བ་མིང་བཟུམ་སྦེ།

འགྱུར་ཅན་འདི་འ་ནི་ཚད་བཟུང་ནང་རྐྱངམ་ཅིག་ནུས་ཅན་ཨིན།

### Example for private variables

Enforce private variables to be private across modules by setting CompatibilityMode(true).

    ' ***** Module1 *****
    Private myText As String
    Sub initMyText
        myText = "Hello"
        Print "In module1 : ", myText
    End Sub

    ' ***** Module2 *****
    'Option Explicit
    Sub demoBug
        CompatibilityMode( true )
        initMyText
        ' Now returns empty string
        ' (or rises error for Option Explicit)
        Print "Now in module2 : ", myText
    End Sub

### འོག་མ་ཡང་ན་ལས་འགན་ཕྱིར་བཏོན་ཤུལ་ལས་འགྱུར་ཅན་ནང་དོན་སྲུངས་བཞག་འབད་དོ།

    མདངས་གྲིབ་རྟག་གཏན་ཝར་མིང་དབྱེ་བ་མིང་བཟུམ་སྦེ།

འགྱུར་ཅན་དེ་གིས་་ཤུལ་མམ་གྱི་ལས་འགན་ཡང་ན་འོག་མ་དེ་མ་བཙུགས་ཚུན་ཚོད་དེའི་གནས་གོང་དེ་བཞགཔ་ཨིན། གསལ་བསྒྲགས་དེ་འོག་མ་ཡང་ན་ལས་འགན་གྱི་ནང་ན་ཡོད་དགོཔ་ཨིན།

## ལས་འགན་གྱི་སླར་ལོག་གནས་གོང་དབྱེ་བ་གསལ་བཀོད་འབད་དོ།

འགྱུར་ཅན་ཚུ་གཅིག་ཁར་ ལས་འགན་མིང་་འདིའི་ཤུལ་ལུ་ཡིག་འབྲུ་གསལ་བསྒྲགས་དབྱེ་བ་ཡང་ན་ "As"གི་སྦེ་བརྡ་སྟོན་ནི་དང་ གནས་གོང་སླར་ལོག་་ལས་འགན་གྱི་ངེས་འཛིན་དབྱེ་བ་ལུ་ཚད་བཟུང་ཐོ་ཡིག་གི་མཇུག་ལུ་གཙོ་ཚིག་མཉམ་པའི་ཐོག་ལས་འབད་མི་གྲངས་སུ་ཚུདཔ་ཨིན་ དཔེར་ན་:

    Function WordCount(WordText As String) As Integer