Module
Contents
Index 🔎︎

# RGB Function

དམར་པོ་ལྗང་ཁུ་དང་སྔོན་པོ་གྲུབ་ལས་གྲུབ་པའི་ཧྲིལ་དབྱིབས་རང་པོའི་ཚོས་གཞི་ཐང་ཕྱིར་ལོག་བྱེད།

## བརྡ་འཕྲོད་

    RGB (Red, Green, Blue)

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

ཧྲིལ་གྲངས་རིང་པོ་

## ཞུགས་གྲངས་

Red:ཚོས་མདོག་ནང་གི་དམར་པའི་གྲུབ་ཆ་ (0-255) ཡིས་ཧྲིལ་གྲངས་གང་རུང་གི་མཚོན་ཚུལ།

Green:ཚོས་མདོག་ནང་གི་སྔོན་པའི་གྲུབ་ཆ་ (0-255) ཡིས་ཧྲིལ་གྲངས་གང་རུང་གི་མཚོན་ཚུལ།

Blue:ཚོས་མདོག་ནང་གི་སྔོན་པའི་གྲུབ་ཆ་ (0-255) ཡིས་ཧྲིལ་གྲངས་གང་རུང་གི་མཚོན་ཚུལ།

## Error codes:

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

## དཔེ་གཞི་

    Sub ExampleColor

    Dim lVar As Long

        lVar = rgb(128,0,200)

        MsgBox "ཚོས་གཞི་" & lVar & " ཡི་གྲུབ་པ་ "& Chr(13) &_

            "red= " & red(lVar) & Chr(13)&_

            "green= " & green(lVar) & Chr(13)&_

            "blue= " & blue(lVar) & Chr(13) , 64,"colors"

    End Sub