Switch Function

རང་འགྱུར་ཚད་རེའུ་འགོད་ལ་ཐང་འགྲོལ་བ། རང་འགྱུར་ཚད་རེའུ་འགོད་ནི་མཚོན་ཚུལ་དང་མཚོན་ཚུལ་རྗེས་ཀྱི་ཐང་ལས་གྲུབ། Switch རྟེན་གྲངས་ཀྱིས་རྟེན་གྲངས་དེ་ཡིས་བརྒྱུད་སྐྱེལ་བྱས་པའི་མཚོན་ཚུལ་དང་འབྲེལ་ཡོད་ཀྱི་ཐང་ཞིག་ཕྱིར་ལོག་བྱས།

བརྡ་འཕྲོད་

Switch (Expression1, Value1[, Expression2, Value2[..., Expression_n, Value_n]])

ཁུགས་གྲངས་

Switch རྟེན་གྲངས་ཀྱིས་གཡོན་ནས་གཡས་སུ་མཚོན་ཚུལ་ལ་ཐང་འགྲོལ་བར་བྱེད་ དེ་རྗེས་རྟེན་གྲངས་མཚོན་ཚུལ་ལ་གཏན་འཁེལ་བྱས་པའི་ཐང་ཕྱིར་ལོག་བྱེད། གལ་ཏེ་མཚོན་ཚུལ་དང་ཐང་གཉིས་ཆ་འགྲིག་གིས་སྤྲད་པ་མིན་ ཁོར་རྒྱུག་ཐོན་པའི་སྐབས་ནོར་འཁྲུལ་ཐོན།

Expression ཐང་འགྲོལ་དགོས་པའི་མཚོན་ཚུལ།

Value མཚོན་པའི་ཚུལ་ནི་ True སྐབས་ཕྱིར་ལོག་པའི་ཐང་།

གཤམ་གྱི་དཔེ་རིས་ནང་ Switch རྟེན་གྲངས་ཀྱིས་རྟེན་གྲངས་དེར་བརྒྱུད་སྐྱེལ་བྱས་པའི་མིང་ལ་འོས་མཚམས་ཀྱི་ཕོ་མོ་གཏན་འཁེལ་བྱ།

Error codes:

5 ནུས་མེད་ཀྱི་བརྒྱུད་རིམ་འཁོར་སྤྱོད་

དཔེ་གཞི་

Sub ExampleSwitch

Dim sGender As String

    sGender = GetGenderIndex( "John" )

    MsgBox sGender

End Sub

 

Function GetGenderIndex (sName As String) As String

    GetGenderIndex = Switch(sName = "Jane", "female", sName = "John", "male")

End Function