IBM Lotus Symphony


Funkcija QBColor [izvajalno okolje]

Vrne RGB barvno kodo barve, podane kot vrednost barve v starejših sistemih za programiranje, ki temeljijo na MS-DOS.

Skladnja:

QBColor (ColorNumber As Integer)

Vrnjena vrednost:

Dolgo celo število

Parameter:

ColorNumber: Katerikoli celoštevilski izraz, ki podaja vrednost barve za barvo, ki je podana iz starejšega sistema za programiranje, ki temelji na MS-DOS.

ColorNumber se lahko dodeli naslednje vrednosti:

0 : Črna

1 : Modra

2 : Zelena

3 : Cijan

4 : Rdeča

5 : Magenta

6 : Rumena

7 : Bela

8 : Siva

9 : Svetlo modra

10 : Svetlo zelena

11 : Svetlo cijan

12 : Svetlo rdeča

13 : Svetlo magenta

14 : Svetlo rumena

15 : Bleščeče bela

Ta funkcija se uporablja samo za pretvorbo iz starejših aplikacij, ki temeljijo na BASIC MS-DOS, in uporabljajo zgoraj navedene kode barv. Funkcija vrne dolgo celo število, ki označuje barvo, ki naj se uporablja v IDE-ju programske opreme Lotus® Symphony™.

Kode napak

5 Neveljavni klic procedure

Primer:

Sub ExampleQBColor

Dim iColor As Integer

Dim sText As String

iColor = 7

sText = "RGB= " & Red(QBColor( iColor) ) & ":" & Blue(QBColor( iColor) ) & ":" & Green(QBColor( iColor) )

MsgBox stext,0,"Barva " & iColor

End Sub


Povratne informacije o izdelku | Dodatna dokumentacija | Blagovne znamke