Platí pro
|
Objekt BoundObjectFrame |
Objekt Image |
Objekt OptionButton |
Objekt SubForm |
|
Objekt CheckBox |
Objekt Label |
Objekt OptionGroup |
Kolekce TabControl |
|
Objekt ComboBox |
Objekt Line |
Objekt Page |
Objekt TextBox |
|
Objekt CommandButton |
Objekt ListBox |
Objekt PageBreak |
Objekt ToggleButton |
|
Objekt CustomControl |
Objekt ObjectFrame |
Objekt Rectangle |
Pomocí vlastnosti IsVisible v kódu jazyka Visual Basic for Applications (VBA) můžete určit, zda je Ovládací prvek na Sestava viditelný. Typ Boolean pro čtení/zápis.
výraz.IsVisible
Výraz Povinný argument. Výraz, který vrátí jeden z objektů v seznamu Platí pro.
Poznámky
Vlastnost IsVisible (Je viditelné) používá následující nastavení.
|
Nastavení |
Popis |
|
True |
(Výchozí) Ovládací prvek se zobrazuje. |
|
False |
Ovládací prvek se nezobrazuje. |
Poznámka: Vlastnost IsVisible (Je viditelné) můžete nastavit jen v události Print (Tisk) pro část sestavy, která tento ovládací prvek obsahuje.
Vlastnost IsVisible můžete použít společně s vlastností HideDuplicates k určení, kdy je ovládací prvek v sestavě viditelný, a v důsledku toho zobrazit nebo skrýt jiné ovládací prvky. Můžete například skrýt ovládací prvek řádku, když je ovládací prvek Textové pole skrytý, protože obsahuje duplicitní hodnoty.
Příklad
V následujícím příkladu se vlastnost IsVisible (Je viditelné) textového pole používá k nastavení zobrazení ovládacího prvku řádku v sestavě. Sestava je založená na tabulce Products (Výrobky) a používá tři ovládací prvky s následujícími vlastnostmi.
|
Vlastnosti |
Ovládací prvek řádku |
Textové pole č. 1 |
Textové pole č. 2 |
|
Název |
Řádek 0 |
ID kategorie |
Název výrobku |
|
Zdroj ovládacího prvku |
ID kategorie |
Název výrobku |
|
|
Skrýt duplikáty |
Ano |
Ne |
|
|
Doleva |
0 |
0 |
2,0 |
|
Nahoru |
0 |
0,1 |
0,1 |
|
Šířka |
4,0 |
1,0 |
1,0 |
Do oddílu deklarací modulu sestavy vložte následující kód a pak v sestavě zkontrolujte formátování řádku, které je určeno vlastností IsVisible (Je viditelné):
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
