For...Next Statement

གསལ་བཤད་ཚུ་ དོན་ལུ་... ཤུལ་མ་ བཀག་དམ་གསལ་བཀོད་འབད་མི་དུས་ཚོད་བར་ན་བསྐྱར་ལོགཔ་ཨིན།

ཚིག་སྦྱོར:

གྱངས་ཁ་རྐྱབས་མི་དོན་ལུ་=མཇུག་བསྡུ་ནི་ལུ་འགོ་བཙུགས་ [Step step]

གསལ་བཤད་འགག་ནི།

[ཕྱིར་འཐོན་དོན་ལུ]

གསལ་བཤད་འགག་ནི།

ཤུལ་མམ [གདོང་ལན]

འགྱུར་ཅན་ཚུ:

གྱངས་ཁ་རྐྱབས་མི་: འཕྲལ་བཀོལ་གྱངས་ཁ་རྐྱབས་འགོ་ཐོག་བསྒང་དེ་རྟགས་འདྲ་མཉམ་(འགོ་བཙུགས)གྱི་གཡས་ཕྱོགས་ལུ་གནས་གོང་དེ་འགན་སྤྲོད་ཡོདཔ་ཨིན། ཨང་གྲངས་ཀཡི་འགྱུར་ཅན་ཚུ་རྐྱངམ་ཅིག་ནུས་ཅན་ཨིན། འཕྲལ་བཀོལ་གྱངས་ཁ་རྐྱབས་མི་དེ་གིས་་ཡར་འཕར་ཡང་ན་མར་འབབ་དེ་འགྱུར་ཅན་གྱི་རིམ་པ་མཇུག་ལུ་རྩིས་སྤྲོད་ཚུན་ཚོད་འཁྲིལ་ཏེ་འབདཝ་ཨིན།

འགོ་བཙུགས་: ཨང་གྲངས་ཀྱི་འགྱུར་ཅན་དེ་འཕྲལ་བཀོལ་གྱི་འགོ་བཙུགསཔ་ད་ལུ་འགོ་ཐོག་གནས་གོང་དེ་ངེས་འཛིན་འབདཝ་ཨིན།

མཇུག་: ཨང་གྲངས་ཀྱི་འགྱུར་ཅན་དེ་འཕྲལ་བཀོལ་གྱི་མཇུག་ལུ་མཐའ་མཇུག་གནས་གོང་དེ་ངེས་འཛིན་འབདཝ་ཨིན།

རིམ་པ་: གནས་གོང་དེ་འཕྲལ་བཀོལ་གདོང་ལན་ག་ཡར་འཕར་ཡང་ན་མར་ཕབ་འབད་ནི་ཨིན་ན་གཞི་སྒྲིག་འབདཝ་ཨིན། རིམ་པ་དེ་གསལ་བཀོད་མ་འབད་བ་ཅིན་ འཕྲལ་བཀོལ་གདོང་ལན་དེ་ ༡ གི་འབད་ཡར་འཕར་འབད་ཡོདཔ་ཨིན། གནད་དོན་དེ་ནང་ མཇུག་དེ་འགོ་བཙུགསཔ་དེ་ལས་སྦོམ་མི་དགོཔ་ཨིན། ཁྱོད་ཀྱིས་གདོང་ལན་མར་ཕབ་འབད་ནི་ཨིན་པ་ཅིན་ མཇུག་བསྡུ་དེ་འགོ་བཙུགས་ལས་ཉུང་མི་དང་ རིམ་པ་དེ་མེད་ཆ་གནས་གོང་ཅིག་འགན་སྤྲོད་དགོཔ་ཨིན།

དོན་ལུ་...ཤུལ་མ་ འཕྲལ་བཀོལ་གྱིས་ཚད་བཟུང་གིས་གསལ་བཀོད་འབད་ཡོད་མི་དུས་ཚོད་ཚུའི་ཨང་དོན་ལུ་འཕྲལ་བཀོལ་ནང་གསལ་བཤད་ཚུ་བསྐྱར་ལོག་འབདཝ་ཨིན།

གདོང་ལན་འགྱུར་ཅན་དེ་མར་ཕབ་ཡོདཔ་ད་LibreOffice གཞི་རིམ་གྱིས་མཇུག་བསྡུ་གནས་གོང་དེ་ལྷོད་པ་ཅིན་བརྟག་ཞིབ་འབདཝ་ཨིན། གདོང་ལན་དེ་་མཇུག་བསྡུ་གནས་གོང་་ལུ་རྩིས་སྤྲོདཔ་ཅིན་འཕྲལ་བཀོལ་རང་བཞིན་གྱིས་མཇུག་བསྡུཝ་ཨིན།

དོན་ལུ་ ...ཤུལ་མ་ གསལ་བཤད་ཚུ་ ནེསིཊི་ལུ་ཚུགསཔ་ཨིན། ཁྱོད་ཀྱིས་འགྱུར་ཅན་འོག་ལུ་ཡོད་མི་ཤུལ་མ་ གསལ་བཤད་ ཤེལ་མམ་དེ་ རང་བཞིན་གྱིས་ད་ལྟོའི་མང་ཤོས་ གསལ་བཤད་ དོན་ལུ་འབྲེལ་བ་འབདཝ་ཨིན།

ཁྱོད་ཀྱིས་ ༠ གི་ཡར་འཕར་ ཅིག་ གསལ་བཤད་ཚུ་ དོན་ལུ་ དང་ ཤུལ་མ་ བར་ན་འཕྲོ་མཐུད་བསྐྱར་ལོག་ཡོདཔ་ཆ་མཉམ་གསལ་བཀོད།

གདོང་ལན་འགྱུར་ཅན་དེ་གྱངས་ཁ་རྐྱབས་པའི་སྐབས་LibreOffice གཞི་རིམ་གྱིས་ལུད་སོང་མི་ཡང་ན་ལུད་ནི་ཨིན་མི་དོན་ལུ་བརྟག་ཞིབ་འབདཝ་ཨིན། འཕྲལ་བཀོལ་དེ་གདོང་ལན་མཇུག་ལྷགཔ་(ཡོད་ཆ་རིམ་པ་གནས་གོང་) ཡང་ན་མཇུག་ལས་ཉུང་མི་(མེད་ཆ་རིམ་པ་གནས་གོང་)སྐབས་མཇུག་བསྡུཝ་ཨིན།

ཕྱིར་ཐོན་དོན་ལུ་ གསལ་བཤད་ དེ་འཕྲལ་བཀོལ་གནས་སྟངས་མེནམ་ལུ་ཕྱིར་ཐོན་ལུ་ལག་ལེན་འཐབ། གསལ་བཤད་དེ་ དོན་ལུ་...ཤུལ་མ་འཕྲལ་བཀོལ་ནང་འཁོད་དགོཔ་ཨིན། ཅིན་...དེ་ལས་ གསལ་བཤད་དེ་ ཕྱིར་ཐོན་གནས་སྟངས་བཟུམ་བརྟག་ཞིབ་འོག་གི་ལག་ལེན་འཐབ:

དོན་ལུ...

གསལ་བཤད་ཚུ།

གནས་སྟངས་ = བདེན་པ་ཨིན་པ་ཅིན་དེ་ལས་ཕྱིར་ཐོན་དོན་ལུ།

གསལ་བཤད་ཚུ།

ཤུལ་མམ།

དྲན་འཛིན་: ནེསེཊི་ཌི་ འཕྲལ་བཀོལ་ཚུ་་ཤུལ་མམ་...དོན་ལུ་ ཁྱོད་ཀྱིས་འཕྲལ་བཀོལ་གནས་སྟངས་བཤོལ་གཅིག་ཁར་ ཕྱིར་ཐོན་དོན་ལུ་ཕྱིར་ཐོན་འབད་བ་ཅིན་འཕྲལ་བཀོལ་གཅིག་རྐྱངམ་ཅིག་ཕྱིར་ཐོན་ཡོདཔ་ཨིན།

དཔེར་བརྗོད།

འོག་གི་དཔེར་བརྗོད་ཚུ་གིས་ དང་པ་བཀང་ཡོད་མི་འདྲ་མིན་སྣོ་ཚོགས་ནང་དོན་ཚུ་གཅིག་ཁར་(ཨེསི་ཐོ་བཀོད་) ཆ་ཤས་ ༡༠ ཚུ་གཅིག་ཁར་ཨེ་རེ་ཡིག་རྒྱུན་ཅིག་དབྱེ་སེལ་ལུ་ནེསེཊེཌི་འཕྲལ་བཀོལ་གཉིས་ལག་ལེན་འཐབ་ཨིན:

Sub ExampleSort

Dim sEntry(9) As String

Dim iCount As Integer

Dim iCount2 As Integer

Dim sTemp As String

    ཨེསི་ཐོ་བཀོད་(༠) = "Jerry"

    ཨེསི་ཐོ་བཀོད་(༡) = "Patty"

    ཨེསི་ཐོ་བཀོད་(༢) = "Kurt"

    ཨེསི་ཐོ་བཀོད་(༣) = "Thomas"

    ཨེསི་ཐོ་བཀོད་(༤) = "Michael"

    ཨེསི་ཐོ་བཀོད་(༥) = "David"

    ཨེསི་ཐོ་བཀོད་(༦) = "Cathy"

    ཨེསི་ཐོ་བཀོད་(༧) = "Susie"

    ཨེསི་ཐོ་བཀོད་(༨) = "Edward"

    ཨེསི་ཐོ་བཀོད་(༩) = "Christine"

    For iCount = 0 To 9

        For iCount2 = iCount + 1 To 9

            If sEntry(iCount) > sEntry(iCount2) Then

                sTemp = sEntry(iCount)

                sEntry(iCount) = sEntry(iCount2)

                sEntry(iCount2) = sTemp

            End If

        Next iCount2

    Next iCount

    For iCount = 0 To 9

        Print sEntry(iCount)

    Next iCount

End Sub