Propriedade IsVisible

Aplica-se a
Access para Microsoft 365 Access 2021 Access 2019 Access 2016

Aplicável a

Objeto BoundObjectFrame Objeto Image Objeto OptionButton Objeto SubForm
Objeto CheckBox Objeto Label Objeto OptionGroup Coleção TabControl
Objeto ComboBox Objeto Line Objeto Page Objeto TextBox
Objeto CommandButton Objeto ListBox Objeto PageBreak Objeto ToggleButton
Objeto CustomControl Objeto ObjectFrame Objeto Rectangle

Você pode usar a propriedade IsVisible no código VBA (Visual Basic for Applications) para determinar se um controle em um relatório está visível. Booliano de leitura/gravação.

expressão.IsVisible

Expressão Necessário. Uma expressão que retorna um dos objetos na lista Aplica-se a.

Comentários

A propriedade IsVisible usa as configurações a seguir.

Configuração Descrição
True (Padrão) O controle está visível.
False O controle não está visível.

Observação

Você pode definir a propriedade IsVisible apenas no evento Imprimir de uma seção do relatório que contém o controle.

Você pode usar a propriedade IsVisible juntamente com a propriedade HideDuplicates para determinar quando um controle em um relatório está visível e mostrar ou ocultar outros controles de acordo. Por exemplo, você pode ocultar um controle de linha quando um controle de caixa de texto estiver oculto porque ele contém valores duplicados.

Exemplo

O exemplo a seguir usa a propriedade IsVisible de uma caixa de texto para controlar a exibição de um controle de linha em um relatório. O relatório está baseado em uma tabela Produtos e usa três controles com as seguintes propriedades.

Propriedades Controle de linha Caixa de texto #1 Caixa de texto #2
Nome Line0 CategoryID ProductName
ControlSource CategoryID ProductName
HideDuplicates Sim Não
Para a Esquerda 0 0 2.0
Superior 0 .1 .1
largura 4.0 1.0 1.0

      

Cole o código a seguir na seção Declarações do módulo do relatório e, em seguida, exiba o relatório para ver a formatação de linha controlada pela propriedade 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