Returnerer et langt som representerer RGB-fargekoden som tilsvarer det angitte fargenummeret.
Syntaks
QBColor(farge)
Det obligatoriske fargeargumenteter et helt tall i området 0–15.
Innstillinger
Fargeargumentet har disse innstillingene:
| Tall | Farge | Tall | Farge |
|---|---|---|---|
| 0 | [Svart] | 8 | Grå |
| 1 | Blå | 9 | Lyseblå |
| 2 | Grønn | 10 | Lysegrønn |
| 3 | Cyan | 11 | Lys cyan |
| 4 | Rød | 12 | Lys rød |
| 5 | Magenta | 13 | Lys magenta |
| 6 | Gul | 14 | Lys gul |
| 7 | Hvit | 15 | Lys hvit |
Merknader
Fargeargumentet representerer fargeverdier som er brukt av tidligere versjoner av Basic (for eksempel Microsoft Visual Basic for MS-DOS og Basic Compiler). Fra og med den minst signifikante byten angir den returnerte verdien de røde, grønne og blå verdiene som brukes til å angi riktig farge i RGB-systemet som brukes av Visual Basic for Applications.
Eksempel
Obs!
I eksemplene nedenfor vises bruken av denne funksjonen i en VBA-modul (Visual Basic for Applications). Hvis du vil ha mer informasjon om hvordan du arbeider med VBA, velger du Utviklerreferanse fra rullegardinlisten ved siden av Søk og skriver inn ett eller flere søkeord i søkeboksen.
Dette eksemplet bruker QBColor-funksjonen til å endre BackColor-egenskapen for skjemaet som sendes inn, til MyForm fargen som angis av ColorCode.
QBColor godtar heltallsverdier mellom 0 og 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub