Lastnost BackColor

Velja za

Predmet BoundObjectFrame

Predmet ObjectFrame

Predmet ComboBox

Predmet OptionGroup

Predmet FormatCondition

Predmet Rectangle

Predmet Image

Predmet Section

Predmet Label

Predmet TextBox

Predmet ListBox

Lastnost BackColor lahko uporabite, če želite določiti barvo za notranjost kontrolnik ali odsek. Dolgo za branje/pisanje.

izraz.BackColor

izraz Obvezen. Izraz, ki vrne enega od predmetov na seznamu uporabi za.

Nastavitev

Lastnost BackColor vsebuje številski izraz, ki ustreza barvi notranjosti kontrolnika ali razdelka.

Z graditeljem barv lahko nastavite to lastnost tako, da kliknete gumb zgradi na desni strani polja z lastnostmi v list z lastnostmi. Uporaba graditelja barv omogoča, da določite barve ozadja po meri za kontrolnike ali odseke.

To lastnost lahko nastavite tudi tako, da uporabite list z lastnostmi, makro ali kodo Visual Basic for Applications (VBA) za kontrolnik ali razdelek; ali tako, da kliknete ukaz Barva polnila v razdelku Pisava (na zavihku Načrt ali Oblika zapisa, odvisno od tega, ali ste v pogledu načrta ali postavitve).

V kodi Visual Basic for Applications (VBA) to lastnost nastavite s številskim izrazom. Nastavitev te lastnosti ima vrsto podatkov Dolgo.

Privzeto nastavitev te lastnosti nastavite tako, da uporabite privzeti slog kontrolnika ali lastnost DefaultControl v kodi VBA.

Za predmete Table (Tabela) lahko to nastavitev nastavite z ukazom Barva polnila v razdelku Pisave na zavihku Podatki, ali v kodi VBA z lastnostjo DatasheetBackColor.

Opombe

Če želite uporabiti lastnost BackColor, mora biti lastnost BackStyle, če je na voljo, nastavljena na Navadno.

Primer

V tem primeru je uporabljena funkcija RGB za nastavitev lastnosti BorderColor, BackColor in ForeColor glede na vrednost polja z besedilom txtPastDue. Te lastnosti lahko nastavite tudi s funkcijo QBColor. Če spodnjo kodo dodate v dogodek Form_Current (), se značilnosti prikaza kontrolnika nastavijo takoj, ko uporabnik odpre obrazec ali se pomakne v nov zapis.

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

Ali potrebujete dodatno pomoč?

Razširite poznavanje Officea
Oglejte si izobraževanje
Prvi dobite nove funkcije
Pridružite se programu Office Insider

Vam je bila informacija v pomoč?

Zahvaljujemo se vam za povratne informacije.

Zahvaljujemo se vam za povratne informacije. Videti je, da bi vam prišla prav pomoč enega od naših Officeovih agentov za podporo.

×