Module
Contents
Index 🔎︎

# Green Function

ཚོས་མདོག་ཚབ་ཨང་གྱི་ལྗང་ཁུལ་གྲུབ་ཆ་གཏན་འཁེལ་བ་ཕྱིར་ལོག་པ་སྤྱོད།

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

    Green (Color As Long)

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

ཧྲིལ་གྲངས་

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

Color:ཧྲིལ་གྲངས་ཐང་རིང་པོ་མཚོན་ཚུལ་ ལྗང་ཁུལ་གྲུབ་ཆའི་གང་རུང་ཕྱིར་ལོག་པ་གཏན་འཁེལ་བ་སྤྱོད་ཚོས་གཞི་ཚབ་ཨང་

## Error codes:

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

## དཔེ་གཞི་

    Sub ExampleColor

    Dim lVar As Long

        lVar = rgb(128,0,200)

        msgbox "The color " & lVar & " contains the components:"& Chr(13) &_

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

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

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

    End Sub