IBM Lotus Symphony


QBColor-funksjonen [kjøretid]

Returnerer RGB-fargekoden i fargen som sendes som en fargeverdi gjennom et eldre MS-DOS-baserte programmeringssystem.

Syntaks:

QBColor (Fargenummer som Heltall)

Returverdi:

Lang

Parameter:

Fargenummer: Et heltallsuttrykk som angir fargeverdien til fargen som sendes fra et eldre MS-DOS-basert programmeringssystem.

Fargenummer kan tildeles følgende verdier:

0 : Svart

1 : Blå

2 : Grønn

3 : Cyan

4 : Rød

5 : Magenta

6 : Gul

7 : Hvit

8 : Grå

9 : Lys blå

10 : Lys grønn

11 : Lys cyan

12 : Lys rød

13 : Lys magenta

14 : Lys gul

15 : Lys hvit

Denne funksjonen brukes bare til å konvertere fra eldre MS-DOS-baserte BASIC-applikasjoner som bruker fargekodene ovenfor. Funksjonen returnerer en lang heltallsverdi som indikerer fargen som skal brukes i Lotus Symphony-IDE.

Feilkoder

5 Ugyldig prosedyrekall

Eksempel:

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,"Color " & iColor

End Sub


Tilbakemelding om produktet | Annen dokumentasjon | Varemerker