Si applica a
|
Oggetto BoundObjectFrame |
Oggetto Image |
Oggetto OptionButton |
Oggetto SubForm |
|
Oggetto CheckBox |
Oggetto Label |
Oggetto OptionGroup |
Raccolta TabControl |
|
Oggetto ComboBox |
Oggetto Line |
Oggetto Page |
Oggetto TextBox |
|
Oggetto CommandButton |
Oggetto ListBox |
Oggetto PageBreak |
Oggetto ToggleButton |
|
Oggetto CustomControl |
Oggetto ObjectFrame |
Oggetto Rectangle |
È possibile usare la proprietà IsVisible in Visual Basic, Applications Edition (VBA) per determinare se un controllo in un report è visibile. Oggetto Boolean di lettura/scrittura.
espressione.IsVisible
espressione Obbligatorio. Espressione che restituisce uno degli oggetti inclusi nell'elenco Si applica a.
Osservazioni
La proprietà IsVisible usa le impostazioni seguenti.
|
Impostazione |
Descrizione |
|
True |
(Impostazione predefinita) Il controllo è visibile. |
|
False |
Il controllo non è visibile. |
Nota: È possibile impostare la proprietà IsVisible solo nell'evento Print di una sezione di report che contiene il controllo.
È possibile usare la proprietà IsVisible con la proprietà .NascondiDuplicati per determinare quando un controllo in un report è visibile e visualizzare o nascondere gli altri controlli di conseguenza. Ad esempio, è possibile nascondere una riga quando un controllo casella di testo è nascosto perché contiene valori duplicati.
Esempio
L'esempio seguente usa la proprietà IsVisible di una casella di testo per controllare la visualizzazione di un controllo riga in un report. Il report si basa su una tabella Prodotti e usa tre controlli con le proprietà seguenti.
|
Proprietà |
Controllo riga |
Casella di testo 1 |
Casella di testo 2 |
|
Name |
Line0 |
IDCategoria |
NomeProdotto |
|
.OrigineControllo |
IDCategoria |
NomeProdotto |
|
|
.NascondiDuplicati |
Sì |
No |
|
|
Left |
0 |
0 |
2.0 |
|
Top |
0 |
.1 |
.1 |
|
Larghezza |
4.0 |
1,0 |
1,0 |
Incollare il codice seguente nella sezione Dichiarazioni del modulo del report e quindi visualizzare i report per vedere la formattazione della linea per la proprietà 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
