Koskee seuraavia
Sidottu objektikehysobjekti |
Kuvaobjekti |
Valintapainikeobjekti |
Alilomakeobjekti |
Valintaruutuobjekti |
Otsikko-objekti |
Valintaryhmäobjekti |
Välilehtiohjausobjektikokoelma |
Yhdistelmäruutuobjekti |
Riviobjekti |
Sivuobjekti |
Tekstiruutuobjekti |
Komentopainikeobjekti |
Luetteloruutuobjekti |
Sivunvaihto-objekti |
Vaihtopainikeobjekti |
Mukautettu ohjausobjekti |
Objektikehysobjekti |
Suorakulmio-objekti |
Visual Basic for Applications (VBA) -koodin OnNäkyvissä-ominaisuuden avulla voit määrittää, onko ohjain näkyvissä raportti-kohteessa. Totuusarvo, jolla on luku- ja kirjoitusoikeudet.
lauseke.OnNäkyvissä
lauseke Pakollinen. Lauseke, joka palauttaa jonkin Koskee seuraavia -luettelon objekteista.
Huomautuksia
OnNäkyvissä-ominaisuus käyttää seuraavia asetuksia.
Asetus |
Kuvaus |
tosi |
(Oletus) Ohjausobjekti on näkyvissä. |
Epätosi |
Ohjausobjekti ei ole näkyvissä. |
Huomautus: Voit määrittää OnNäkyvissä-ominaisuuden vain ohjausobjektin sisältävän raporttiosan Tulosta-tapahtumassa.
Voit määrittää OnNäkyvissä-ominaisuuden sekä KaksoisarvojenPiilottaminen-ominaisuuden avulla, milloin raportin ohjausobjekti on näkyvissä ja näyttää tai piilottaa muut ohjausobjektit sen mukaan. Voit esimerkiksi piilottaa riviohjausobjektin, kun tekstiruutuohjausobjekti piilotetaan, koska se sisältää arvojen kaksoiskappaleet.
Esimerkki
Seuraavassa esimerkissä tekstiruudun OnNäkyvissä-ominaisuutta käytetään riviohjausobjektin näkymisen hallintaan raportissa. Raportti perustuu Tuotteet-taulukkoon ja siinä käytetään kolmea ohjausobjektia seuraavilla ominaisuuksilla.
Ominaisuudet |
Riviohjausobjekti |
Tekstiruutu 1 |
Tekstiruutu 2 |
Nimi |
Rivi0 |
LuokanTunnus |
TuotteenNimi |
OhjausobjektinLähde |
LuokanTunnus |
TuotteenNimi |
|
KaksoisarvojenPiilottaminen |
Kyllä |
Ei |
|
Vasen |
0 |
0 |
2,0 |
Ylä |
0 |
0,1 |
0,1 |
Leveys |
4,0 |
1,0 |
1,0 |
Liitä seuraava koodi raporttimoduulin määrittelyosaan ja katso sitten raportista OnNäkyvissä-ominaisuuden hallitsema rivimuotoilu:
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