Taikoma
|
Objektas BoundObjectFrame |
Objektas Image |
Objektas OptionButton |
Objektas SubForm |
|
Objektas CheckBox |
Objektas Label |
Objektas OptionGroup |
Rinkinys TabControl |
|
Objektas ComboBox |
Objektas Line |
Objektas Page |
Objektas TextBox |
|
Objektas CommandButton |
Objektas ListBox |
Objektas PageBreak |
Objektas ToggleButton |
|
Objektas CustomControl |
Objektas ObjectFrame |
Objektas Rectangle |
Ypatybę IsVisible galite naudoti "Visual Basic for Applications" (VBA) kode, kad nustatytumėte, ar ataskaita matomi valdiklis. Skaityti/rašyti Boolean.
reiškinys.IsVisible
reiškinys Būtina. Reiškinys, kuris pateikia vieną iš sąrašo „Taikoma“ objektų.
Pastabos
Ypatybė IsVisible naudoja toliau pateiktus parametrus.
|
Parametras |
Aprašas |
|
Teisinga |
(Numatytasis parametras) Valdiklis yra matomas. |
|
False |
Valdiklis nėra matomas. |
Pastaba: Ypatybę IsVisible galite nustatyti tik ataskaitos sekcijos, kurioje yra valdiklis, įvykyje Print.
Ypatybę IsVisible galite naudoti kartu su ypatybe HideDuplicates , kad nustatytumėte, kada ataskaitos valdiklis yra matomas, ir rodykite arba slėpkite kitus valdiklius kaip rezultatą. Pavyzdžiui, galite paslėpti eilutės valdiklį, kai teksto laukas valdiklis paslėptas, nes jame yra pasikartojančių reikšmių.
Pavyzdys
Toliau pateiktame pavyzdyje teksto lauko ypatybė IsVisible naudojama eilutės valdiklio rodymui ataskaitoje kontroliuoti. Ši ataskaita pagrįsta lentele Produktai ir naudoja tris valdiklius su toliau pateiktomis ypatybėmis.
|
Ypatybės |
Eilutės valdiklis |
1 teksto laukas |
2 teksto laukas |
|
Pavadinimas |
Line0 |
CategoryID |
ProductName |
|
ControlSource |
CategoryID |
ProductName |
|
|
HideDuplicates |
Taip |
Ne |
|
|
Left |
0 |
0 |
2.0 |
|
Top |
0 |
.1 |
.1 |
|
Width |
4.0 |
1.0 |
1.0 |
Įklijuokite šį kodą į ataskaitos modulio sekciją Deklaracijos, o tada peržiūrėkite ataskaitą, kad pamatytumėte eilučių formatavimą, kurį kontroliuoja ypatybė 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
