Поделиться через

Свойство ComboBox.BackColor (Access)

  • Статья

Возвращает или задает внутренний цвет указанного объекта. Для чтения и записи, Long.

Синтаксис

expression. Backcolor

Выражение Переменная, представляющая объект ComboBox .

Замечания

Свойство BackColor содержит числовое выражение, соответствующее цвету, используемому для заполнения внутренней части элемента управления или раздела.

Вы можете задать значение по умолчанию для этого свойства, используя стиль элемента управления по умолчанию или свойство DefaultControl в Visual Basic.

Чтобы использовать свойство BackColor , для свойства BackStyle (если оно доступно) должно быть задано значение Обычное.

Пример

В следующем примере функция RGB используется для задания свойств BorderColor, BackColor и ForeColor в зависимости от значения текстового поля txtPastDue . Для задания этих свойств можно также использовать функцию QBColor . Помещая следующий код в событие Form_Current( ) задает характеристики отображения элемента управления, как только пользователь открывает форму или переходит к новой записи.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.