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