Вы должны изменить выражение для ячейка BackgroundColor
и помнить, что это было. Для этого нам понадобится специальный код. Перейдите в меню Report
выберите Report Properties...
и нажмите на Code
и введите следующий код:
Dim ThisPetColor As String
Function PetColor(PetType As String) As String
If ThisPetColor = "" Then
ThisPetColor = "White"
End If
If PetType = "cat" Then
ThisPetColor = "Yellow"
Else If PetType = "hamster" Then
ThisPetColor = "Green"
Else If PetType = "unicorn" Then
ThisPetColor = "Purple"
End If
Return ThisPetColor
End Function
Затем в камере сделать выражение BackgroundColor
быть:
=Code.PetColor(Fields!pet.Value)
или для еще большей гибкости при копировании формула, с помощью встроенного в Me
ссылки на текстовое поле:
=Code.PetColor(Me.Value)
Так Ва t мы создаем глобальную переменную для цвета домашнего животного ThisPetColor
и инициализируем ее «белым». Когда изменяется тип домашнего животного, если он является одним из тех, где мы меняем цвет, мы меняем значение глобальной переменной на новый цвет домашнего животного и используем его после этого (до следующего типа домашнего животного).
Это изменило бы цвет строки cat. Я хочу, чтобы цвета фона изменились после строки cat и дальше. – TechGrl1
Хорошо, попробуйте обновить ответ –