Module
Contents
Index 🔎︎

# Funkce Red

Vrací hodnotu červené složky pro zadaný kód barvy.

## Syntaxe:

    Red (Barva As Long)

## Návratová hodnota:

Celé číslo

## Parametr:

Barva: Celočíselný výraz určující jakýkoliv kód barvy, jehož červenou složku chcete vrátit.

## Chybové kódy:

5 Neplatné volání procedury

## Příklad:

    Sub ExampleColor

    Dim lVar As Long

        lVar = rgb(128,0,200)

        MsgBox "Barva " & lVar & " se skládá z:" & Chr(13) &_

            "červená= " & red(lVar) & Chr(13)&_

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

            "modrá= " & blue(lVar) & Chr(13) , 64,"barvy"

    End Sub