IBM Lotus Symphony
|
Берілген түс кодының жасыл құрылымын қайтарады.
Жасыл (Ұзақтық ретіндегі түс)
Бүтін сан
Түс: жасыл құрамдасты қайтару үшін түс коды анықтайтын ұзақ бүтін сан өрнегі.
Sub ExampleColor
lVar Long сияқты қарайту
lVar = rgb(128,0,200)
msgbox "Түс " & lVar & " келесі құрамдастар бар:" & Chr(13) &_
"қызыл = " & қызыл (lVar) & Chr(13)&_
"жасыл = " & жасыл(lVar) & Chr(13)&_
"көкe = " & көк(lVar) & Chr(13) , 64,"түстер"
Аяқталу ішкі элементі