Uygulandığı öğe
BoundObjectFrame Nesnesi |
Image Nesnesi |
OptionButton Nesnesi |
AltRapor Nesnesi |
OnayKutusu Nesnesi |
Label Nesnesi |
OptionGroup Nesnesi |
SekmeDenetimi Koleksiyonu |
AçılanKutu Nesnesi |
Line Nesnesi |
Page Nesnesi |
MetinKutusu Nesnesi |
KomutDüğmesi Nesnesi |
ListBox Nesnesi |
PageBreak Nesnesi |
İkiDurumluDüğme Nesnesi |
ÖzelDenetim Nesnesi |
NesneÇerçevesi Nesnesi |
Dikdörtgen Nesnesi |
IsVisible özelliğini, Visual Basic for Applications (VBA) kodunda rapor üzerindeki denetim öğesinin görünür olup olmadığını belirlemek için kullanabilirsiniz. Okuma/yazma Boole.
ifade.IsVisible
ifade Gerekli. Uygulandığı Öğe listesindeki nesnelerden birini döndüren ifade.
Notlar
IsVisible özelliği aşağıdaki ayarları kullanır.
Ayar |
Açıklama |
True |
(Varsayılan) Denetim görünür durumdadır. |
False |
Denetim görünür durumda değildir. |
Not: IsVisible özelliğini yalnızca denetimi içeren rapor bölümünün Print olayında ayarlayabilirsiniz.
Rapordaki denetimin ne zaman görünür durumda olacağını ve sonuç olarak diğer denetimlerin gösterileceğini veya gizleneceğini belirlemek için IsVisible özelliğini HideDuplicates özelliğiyle birlikte kullanabilirsiniz. Örneğin, yinelenen değerler içerdiğinden bir metin kutusu denetimi gizlendiğinde, bir çizgi denetimini de gizleyebilirsiniz.
Örnek
Aşağıdaki örnekte, rapordaki çizgi denetiminin görüntülenme durumunu denetlemek için bir metin kutusunun IsVisible özelliği kullanılır. Rapor, Ürünler tablosunu temel alır ve aşağıdaki özelliklere sahip üç denetim kullanır.
Özellikler |
Çizgi denetimi |
Metin kutusu 1 |
Metin kutusu 2 |
Ad |
Çizgi0 |
KategoriKimliği |
ÜrünAdı |
DenetimKaynağı |
KategoriKimliği |
ÜrünAdı |
|
HideDuplicates |
Evet |
Hayır |
|
Left |
0 |
0 |
2,0 |
Top |
0 |
0,1 |
0,1 |
Width |
4,0 |
1,0 |
1,0 |
Aşağıdaki kodu rapor modülünün Bildirimler bölümüne yapıştırın ve ardından IsVisible özelliğiyle denetlenen çizgi biçimlendirmesini görmek için raporu görüntüleyin:
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