Lastnost »Barva ozadja«

Velja za

Predmet BoundObjectFrame

Predmet ObjectFrame

Predmet ComboBox

Predmet OptionGroup

Predmet FormatCondition

Predmet Rectangle

Predmet Image

Predmet Section

Predmet Label

Predmet TextBox

Predmet ListBox

Z lastnostjo BackColor lahko določite barvo notranjosti kontrolnika ali odseka. Dolgo za branje/pisanje.

izraz.BackColor

izraz »Zahtevano«. Izraz, ki vrne enega od predmetov s seznama »Velja za«.

Nastavitev

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

Z graditeljem barv lahko to lastnost nastavite tako, da kliknete gumb nastavite tudi v pogovornem oknu Zgradi desno od polja z lastnostmi na listu z lastnostmi. Z graditeljem barv lahko 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
Razširite svoja znanja
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.

×