Returnerer en lang verdi som representerer RGB-fargekoden som tilsvarer det angitte fargenummeret.
Syntaks
QBColor ( farge )
Den nødvendige fargenargument er et heltall i området 0–15.
Innstillinger
Fargeargumentet har disse innstillingene:
Tall |
Farge |
Tall |
Farge |
0 |
[Svart] |
8 |
Grå |
1 |
Blå |
9 |
Lys blå |
2 |
Grønn |
10 |
Lys grø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 |
Hvitt |
Kommentarer
Fargeargumentet representerer fargeverdier som brukes 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 Egenskapen BackColor (Bakgrunnsfarge ) for skjemaet som sendes inn som MyForm til fargen angitt av ColorCode. QBColor godtar heltallsverdier mellom 0 og 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form) MyForm.BackColor = QBColor(ColorCode) End Sub