Pateikia ilgą skaičių, reiškiantį RGB spalvos reikšmę.
Sintaksė
RGB( raudona, žalia, mėlyna )
Funkcijos RGB sintaksė turi tokius argumentus:
Argumentas |
Aprašas |
raudona |
Būtinas. Variantas (sveikasis skaičius). Skaičius diapazone nuo 0 iki 255 imtinai, nurodantis raudoną spalvos komponentą. |
žalia |
Būtinas. Variantas (sveikasis skaičius). Skaičius diapazone nuo 0 iki 255 imtinai, nurodantis žalią spalvos komponentą. |
mėlyna |
Būtinas. Variantas (sveikasis skaičius). Skaičius diapazone nuo 0 iki 255 imtinai, nurodantis mėlyną spalvos komponentą. |
Pastabos
Programos metodai ir ypatybės, kurios priima spalvos specifikaciją, tikisi, kad specifikacija bus skaičius, nurodantis RGB spalvos reikšmę. RGB spalvos reikšmė nurodo santykinį raudonos, žalios ir mėlynos spalvos intensyvumą, kad būtų rodoma konkreti spalva.
Laikoma, kad bet kurios argumentasRGB reikšmė, viršijanti 255, yra 255.
Šioje lentelėje išvardytos kai kurios standartinės spalvos ir raudonos, žalios ir mėlynos reikšmės:
Spalva |
Raudona reikšmė |
Žalia reikšmė |
Mėlyna reikšmė |
Juoda |
0 |
0 |
0 |
Mėlyna |
0 |
0 |
255 |
Žalia |
0 |
255 |
0 |
Cyan |
0 |
255 |
255 |
Red |
255 |
0 |
0 |
Magenta |
255 |
0 |
255 |
Geltona |
255 |
255 |
0 |
Balta |
255 |
255 |
255 |
Šios funkcijos pateikiamos RGB spalvų reikšmės nesuderinamos su naudojamomis operacinėje sistemoje Macintosh. Jos gali būti naudojamos "Microsoft" programų, skirtų Macintosh, kontekste, tačiau jų negalima naudoti tiesiogiai keičiant spalvas operacinei sistemai Macintosh.
Pavyzdys
Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.
Šiame pavyzdyje parodyta, kaip RGB funkcija naudojama grąžinti sveikąjį skaičių, reiškiantį RGB spalvos reikšmę. Jis naudojamas tiems programos metodams ir ypatybėms, kurie priima spalvų specifikaciją. Objekto MyObject ir jo ypatybė naudojami tik iliustracijų tikslais. Jei MyObject nėra arba ji neturi ypatybės Spalva , įvyksta klaida.
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)