StrComp Function

་ཡིག་རྟགས་ཕྲེང་བ་གཉིས་གཤིབ་སྡུར་འབྲས་བུའི་ཚབ་བྱེད་ཅིག་གི་ཧྲིལ་གྲངས་ཐང་དུ་ཕྱིར་ལོག་པ།

བརྡ་འཕྲོད་


StrComp (Text1 As String, Text2 As String[, Compare])

ཕྱིར་ལོག་ཐང་

Integer

ཞུགས་གྲངས་

Text1 ཡིག་རྟགས་ཕྲེང་བའི་མཚོན་ཚུལ་གང་རུང་ཞིག་

Text2 ཡིག་རྟགས་ཕྲེང་བའི་མཚོན་ཚུལ་གང་རུང་ཞིག་

Compare གཤིབ་སྡུར་ཐབས་ཀྱི་ཁུངས་གྲངས་བཀོད་སྒྲིག་སྤྱོད་པ།(གདེམས་རུང་)གལ་སྲིད་ Compare = 1ཡིན་ན་ཡིག་རྟགས་ཕྲེང་བའི་་གཤིབ་སྡུར་སྐབས་ཡིག་ཆེན་ཡིག་ཆུང་གི་ཁྱད་པར་མེད། གལ་སྲིད་ Compare = 0ཡིན་ན་ཡིག་ཆེན་ཡིག་ཆུང་གི་དབྱེ་བ་མེད།

ཕྱིར་ལོག་ཐང་

Error codes:

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

དཔེ་གཞི་


Sub ExampleStrComp
Dim iVar As Single
Dim sVar As String
    iVar = 123.123
    sVar = Str$(iVar)
    MsgBox strcomp(sVar , Str$(iVar),1)
End Sub

Please support us!