Rakenduskoht
|
Objekt BoundObjectFrame |
Objekt Image |
Objekt OptionButton |
Objekt SubForm |
|
Objekt CheckBox |
Objekt Label |
Objekt OptionGroup |
Kogum TabControl |
|
Objekt ComboBox |
Objekt Line |
Objekt Page |
Objekt TextBox |
|
Objekt CommandButton |
Objekt ListBox |
Objekt PageBreak |
Objekt ToggleButton |
|
Objekt CustomControl |
Objekt ObjectFrame |
Objekt Rectangle |
Visual Basic for Applicationsi (VBA) koodi atribuudi IsVisible abil saate kindlaks teha, kas aruannejuhtelement on nähtav. Lugemis-/kirjutamisõigusega kahendmuutuja.
avaldis.IsVisible
avaldis Nõutav. Avaldis, mis tagastab loendi Rakenduskoht objekti.
Kommentaarid
Atribuut IsVisible kasutab järgmisi sätteid.
|
Säte |
Kirjeldus |
|
True (Tõene) |
(Vaikimisi) Juhtelement on nähtav. |
|
False (Väär) |
Juhtelement ei ole nähtav. |
Märkus.: Atribuudi IsVisible saate määrata ainult sündmuse Print aruande jaotises, mis sisaldab juhtelementi.
Et teha kindlaks kas aruandes on juhtelement nähtav ning kas selle tulemusel teisi juhtelemente kuvatakse või peidetakse, saate kasutada vastavaid atribuute IsVisible ja HideDuplicates. Näiteks kui juhtelement tekstiväli on peidetud, saate peita rea juhtelemendi, kuna see sisaldab duplikaatväärtusi.
Näide
Järgmises näites kasutatakse tekstivälja atribuuti IsVisible, et reguleerida aruandes rea juhtelemendi kuvamist. Aruanne põhineb tootetabelil ja kasutatakse järgmiste atribuutidega kolme juhtelementi.
|
Properties (Atribuudid) |
Line control (Rea juhtelement) |
Text box #1 (1. tekstiväli) |
Text box #2 (2. tekstiväli) |
|
Name |
Line0 |
CategoryID |
ProductName |
|
ControlSource |
CategoryID |
ProductName |
|
|
HideDuplicates |
Jah |
Ei |
|
|
Left |
0 |
0 |
2.0 |
|
Top |
0 |
.1 |
.1 |
|
Width |
4.0 |
1.0 |
1.0 |
Kleepige järgmine kood aruande mooduli Deklaratsioonide jaotisesse ning seejärel vaadake aruannet, et näha atribuudi IsVisible reguleeritud rea vormingut:
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 IfEnd Sub
