Применение
| Объект BoundObjectFrame | Объект ObjectFrame |
|---|---|
| Объект ComboBox | Объект OptionGroup |
| Объект FormatCondition | Объект Rectangle |
| Объект Image | Объект Section |
| Объект Label | Объект TextBox |
| Объект ListBox |
Свойство BackColor можно использовать для указания цвета внутренней части элемента управления или раздела. Возвращает доступное для чтения и записи значение типа Long.
выражение.BackColor
Выражение Обязательно. Выражение, возвращающее один из объектов в списке Применяется к.
Значение
Свойство BackColor содержит числовое выражение, соответствующее цвету, используемому для заполнения внутренней части элемента управления или раздела.
Чтобы задать это свойство, нажмите кнопку Сборка справа от поля свойства на странице свойств с помощью построителя цветов. С помощью построителя цветов можно определить настраиваемые цвета обратной стороны для элементов управления или разделов.
Это свойство также можно задать с помощью страницы свойств элемента управления или раздела, макроса или кода Visual Basic для приложений (VBA) или с помощью команды Цвет заливки в разделе Шрифт (на вкладке Конструктор или Формат в зависимости от того, находитесь ли вы в режиме конструктора или макета).
В Visual Basic для приложений (VBA) для настройки этого свойства используйте числовое выражение. Этот параметр имеет тип данных Long.
Вы можете задать значение по умолчанию для этого свойства, используя стиль элемента управления по умолчанию или свойство DefaultControl в коде VBA.
Для объектовTable можно задать данное свойство с помощью команды Цвет заливки в разделе Шрифт на вкладке Данные или в коде VBA с помощью свойства DatasheetBackColor.
Замечания
Чтобы использовать свойство BackColor, необходимо задать для свойства BackStyle (Тип фона), если оно доступно, значение Normal (Обычный).
Пример
В следующем примере функция 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