S’applique à
Objet BoundObjectFrame |
Objet Image |
Objet OptionButton |
Objet SubForm |
Objet CheckBox |
Objet Label |
Objet OptionGroup |
Collection TabControl |
Objet ComboBox |
Objet Line |
Objet Page |
Objet TextBox |
Objet CommandButton |
Objet ListBox |
Objet PageBreak |
Objet ToggleButton |
Objet CustomControl |
Objet ObjectFrame |
Objet Rectangle |
Vous pouvez utiliser la propriété IsVisible à l’aide d’un code Visual Basic pour Applications (VBA) pour déterminer si un contrôle associé à un état doit être visible. Booléen en lecture/écriture.
expression.IsVisible
expression Obligatoire. Expression qui renvoie l’un des objets de la liste S’applique à.
Remarques
La propriété IsVisible utilise les paramètres suivants.
Paramètre |
Description |
Vrai |
(Par défaut) Le contrôle est visible. |
False |
Le contrôle n’est pas visible. |
Remarque : Vous ne pouvez définir la propriété IsVisible que dans l’événement Print d’une section d’état contenant le contrôle.
Vous pouvez utiliser la propriété IsVisible conjointement avec la propriété HideDuplicates pour déterminer quand un contrôle d’état doit être visible, et afficher ou masquer les autres contrôles en conséquence. Par exemple, vous pouvez masquer un contrôle de ligne lorsqu’un contrôle de zone de texte est masqué parce qu’il contient des valeurs en double.
Exemple
L’exemple suivant utilise la propriété IsVisible d’une zone de texte pour déterminer l’affichage d’un contrôle de ligne dans un état. L’état est basé sur une table Produits et utilise trois contrôles avec les propriétés suivantes.
Propriétés |
Contrôle de ligne |
Zone de texte n°1 |
Zone de texte n°2 |
Name |
Line0 |
CategoryID |
ProductName |
ControlSource |
CategoryID |
ProductName |
|
HideDuplicates |
Oui |
Non |
|
Left |
0 |
0 |
2.0 |
Top |
0 |
.1 |
.1 |
Width |
4.0 |
1.0 |
1.0 |
Collez le code suivant dans la section Déclarations du module d’état, puis affichez l’état pour voir la mise en forme de ligne contrôlée par la propriété 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