BackColor-egenskapen

Gjelder for

BoundObjectFrame-objektet

ObjectFrame-objektet

ComboBox-objektet

OptionGroup-objektet

FormatCondition-objektet

Rectangle-objektet

Image-objektet

Section-objektet

Label-objektet

TextBox-objektet

ListBox-objektet

Du kan bruke egenskapen Bakgrunnsfarge til å angi farge for innsiden på kontroll eller inndeling. Lese/skrive Lang.

uttrykk.BackColor

uttrykk Påkrevd. Et uttrykk som returnerer ett av objektene i Gjelder for-listen.

Innstilling

Egenskapen Bakgrunnsfarge inneholder en numerisk uttrykk som tilsvarer fargen som brukes til å fylle innsiden på en kontroll eller inndeling.

Du kan bruke fargeverktøyet til å angi denne egenskapen ved å klikke på Bygg-knappen til høyre for egenskapsboksen i egenskapsark. Ved hjelp av fargeverktøyet kan du lage egendefinerte bakgrunnsfarger for kontroller eller inndelinger.

Du kan også angi denne egenskapen ved å bruke egenskapsark for en kontroll eller inndeling, en makro, eller Visual Basic for Applications (VBA)-kode, eller ved å bruke Fyllfarge-kommandoen under Skrift (på Utforming- eller Format-fanen, avhengig av om du er i utformingsvisning eller oppsettvisning).

Bruk et numerisk uttrykk til å angi denne egenskapen i Visual Basic for Applications (VBA)-kode. Denne egenskapsinnstillingen har datatypen Lang.

Du kan angi standard for denne egenskapen ved hjelp av kontrollens standard kontrollstil eller egenskapen DefaultControl i VBA-kode.

For Table-objekter kan du angi denne egenskapen ved bruk av kommandoen Fill Color under SkriftData-fanen, eller i VBA-koden ved hjelp av egenskapen DatasheetBackColor.

Merknader

Hvis du ønsker å bruke egenskapen BackColor, må egenskapen BackStyle, hvis den er tilgjengelig, angis til Normal.

Eksempel

Følgende eksempel bruker funksjonen RGB til å angi egenskapene BorderColor, BackColor og ForeColor, avhengig av verdien i tekstboksen txtPastDue. Du kan også bruke funksjonen QBColor til å angi disse egenskapene. Hvis du legger følgende kode til i hendelsen Form_Current (), angis kontrollen Visningsegenskaper så snart brukeren åpner et skjema eller flytter til en ny post.

Sub Form_Current()
Dim curAmntDue As Currency, lngBlack As Long
Dim lngRed As Long, lngYellow As Long, lngWhite As Long
If Not IsNull(Me!txtPastDue.Value) Then
curAmntDue = Me!txtPastDue.Value
Else
Exit Sub
End If
lngRed = RGB(255, 0, 0)
lngBlack = RGB(0, 0, 0)
lngYellow = RGB(255, 255, 0)
lngWhite = RGB(255, 255, 255)
If curAmntDue > 100 Then
Me!txtPastDue.BorderColor = lngRed
Me!txtPastDue.ForeColor = lngRed
Me!txtPastDue.BackColor = lngYellow
Else
Me!txtPastDue.BorderColor = lngBlack
Me!txtPastDue.ForeColor = lngBlack
Me!txtPastDue.BackColor = lngWhite
End If
End Sub
Utvid ferdighetene dine
Utforsk opplæring
Vær først ute med de nye funksjonene
Bli med i Office Insiders

Var denne informasjonen nyttig?

Takk for tilbakemeldingen!

Takk for tilbakemeldingen! Det høres ut som det kan være lurt å sette deg i kontakt med én av våre Office-kundestøtteagenter.

×