Применение
Объект BoundObjectFrame |
Объект Image |
Объект OptionButton |
Объект SubForm |
Объект CheckBox |
Объект Label |
Объект OptionGroup |
Объект TabControl |
Объект ComboBox |
Объект Line |
Объект Page |
Объект TextBox |
Объект CommandButton |
Объект ListBox |
Объект PageBreak |
Объект ToggleButton |
Объект CustomControl |
Объект ObjectFrame |
Объект Rectangle |
Чтобы определить, отображается ли элемент управления в отчете, можно использовать свойство IsVisible (Вывод на экран) в Visual Basic для приложений (VBA). Свойство имеет значение типа Boolean, доступное для чтения или записи.
выражение.IsVisible
Выражение Обязательный. Выражение, возвращающее один из объектов в списке Применяется к.
Замечания
Свойство IsVisible может принимать следующие значения:
Значение |
Описание |
True |
(Значение по умолчанию.) Элемент управления отображается. |
False |
Элемент управления не отображается. |
Примечание: Свойство IsVisible задается только в событии Print (Печать) раздела отчета, содержащего этот элемент управления.
Чтобы определить, когда выводить на экран элемент управления в отчете, и в результате этого скрывать или выводить другие элементы управления, можно использовать свойство IsVisible вместе со свойством HideDuplicates (Не выводить повторы). Например, можно скрыть элемент управления "Линия", если скрыт элемент текстовое поле, поскольку он содержит повторяющиеся значения.
Пример
В следующем примере свойство IsVisible текстового поля используется для управления отображением строкового элемента управления в отчете. Отчет основан на таблице Products и использует три элемента управления со следующими свойствами.
Свойства |
Элемент управления "Линия" |
Текстовое поле 1 |
Текстовое поле 2 |
Name (Имя) |
Line0 |
CategoryID |
ProductName |
ControlSource (Данные) |
CategoryID |
ProductName |
|
HideDuplicates (Не выводить повторы) |
Да |
Нет |
|
Left (От левого края) |
0 |
0 |
2,0 |
Top (От верхнего края) |
0 |
0,1 |
0,1 |
Width (Ширина) |
4,0 |
1,0 |
1,0 |
Вставьте следующий код в раздел описаний (Declarations) модуля отчета и просмотрите отчет, чтобы увидеть, как свойство IsVisible управляет форматированием линии:
Private Sub Detail_Print(Cancel As Integer, _
PrintCount As Integer)
If Me!CategoryID.IsVisible Then
Me!Line0.Visible = True
Else
Me!Line0.Visible = False
End If
End Sub