Tagastab värvi RGB-väärtuse pika täisarvuna.
Süntaks
RGB(punane, roheline, sinine)
Funktsioonil RGB on järgmised argumendid.
| Argument | Kirjeldus |
|---|---|
| punane | Nõutav. Variant (täisarv). Arv vahemikus 0–255 (k.a), mis tähistab punase osakaalu värvis. |
| roheline | Nõutav. Variant (täisarv). Arv vahemikus 0–255 (k.a), mis tähistab rohelise osakaalu värvis. |
| sinine | Nõutav. Variant (täisarv). Arv vahemikus 0–255 (k.a), mis tähistab sinise osakaalu värvis. |
Kommentaarid
Rakenduse meetodid ja atribuudid, mis aktsepteerivad värvimääratlust, eeldavad, et see määratlus on arvuline RGB-väärtus. Värvi RGB-väärtus määrab punase, rohelise ja sinise suhtelised osakaalud, mille põhjal kuvatakse konkreetne värv.
Eeldatakse, et RGB mis tahes argumendi väärtus, mis ületab 255, on 255.
Järgmises tabelis on esitatud standardvärvid ja nende punase, rohelise ja sinise osakaal.
| Värv | Punase väärtus | Rohelise väärtus | Sinise väärtus |
|---|---|---|---|
| Must | 0 | 0 | 0 |
| Sinine | 0 | 0 | 255 |
| Roheline | 0 | 255 | 0 |
| Tsüaan | 0 | 255 | 255 |
| Punane | 255 | 0 | 0 |
| Magenta | 255 | 0 | 255 |
| Kollane | 255 | 255 | 0 |
| Valge | 255 | 255 | 255 |
Selle funktsiooni tagastatavad RGB-väärtused ei ühildu Macintoshi opsüsteemides kasutatavate väärtustega. Neid väärtusi võib kasutada Macintoshi jaoks mõeldud Microsofti rakendustes, aga mitte otse Macintoshi opsüsteemile värvidega seotud käskude andmiseks.
Näide
Märkus.
Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.
Selles näites kujutatakse seda, kuidas funktsiooni RGB abil tagastatakse täisarv, mis tähistab värvi RGB-väärtust. Seda kasutatakse nendes rakenduste meetodites ja atribuutides, mis aktsepteerivad värvimääratlust. Objekti MyObject ja selle atribuuti kasutatakse ainult illustreerimiseks. Kui MyObject seda pole olemas või kui sellel pole atribuuti Color , ilmneb tõrge.
Dim RED, I, RGBValue, MyObject
' Return the value for Red.
Red = RGB(255, 0, 0)
' Initialize offset.
I = 75
RGBValue = RGB(I, 64 + I, 128 + I)
' Same as RGB(75, 139, 203).
' Set the Color property of MyObject to Red.
MyObject.Color = RGB(255, 0, 0)