Käytetään kohteeseen
Access for Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Koskee seuraavia

Yhdistelmäruutuobjekti

Raporttiobjekti

Komentopainikeobjekti

Välilehtiohjausobjektikokoelma

Muotoiluehto-objekti

Tekstiruutuobjekti

Otsikko-objekti

Vaihtopainikeobjekti

Luetteloruutuobjekti

LihavoituFontti-ominaisuuden avulla voit määrittää, näkyykö fontti lihavoituna seuraavissa tilanteissa:

  • Lomakkeiden ja raporttien ohjausobjekteja näytettäessä ja tulostettaessa.

  • Käytettäessä raportissa Tulostus-menetelmää.

Huomautuksia

LihavoituFontti-ominaisuus käyttää seuraavia asetuksia.

Asetus

Kuvaus

tosi

Teksti on lihavoitu.

Epätosi

(Oletus) Teksti ei ole lihavoitu.

Huomautus: Voit määrittää LihavoituFontti-ominaisuuden vain makron tai Visual Basic for Applications (VBA) -koodin avulla.

Käytä LihavoituFontti-ominaisuutta raportissa luomalla ensin Tulostustapahtumatoimintosarjan tapahtumatoimintosarja, joka tulostaa halutun tekstin.

Fontin ulkoasu voi vaihdella näytöllä ja tulostettuna tietokoneen ja tulostimen perusteella.

Ohjausobjektien ominaisuusikkunasta löytyvällä FontinLeveys-ominaisuudella voidaan myös määrittää ohjausobjektin tekstin viivan leveys. LihavoituFontti-ominaisuus on nopea tapa lihavoida tekstiä, ja FontinLeveys-ominaisuudella tekstin viivan leveyttä voi hallita tarkemmin. Seuraavassa taulukossa on esitetty näiden ominaisuusasetusten välinen suhde.

Jos

Niin:

LihavoituFontti = Epätosi

FontinLeveys = Normaali (400)

LihavoituFontti = Tosi

FontinLeveys = Lihavoitu (700)

FontinLeveys < 700

LihavoituFontti = Epätosi

FontinLeveys > = 700

LihavoituFontti = Tosi

Esimerkki

Seuraava Tulostus-tapahtumatoimintosarja tulostaa raportin otsikon ja nykyisen päivämäärän raporttiin lihavoituna CurrentX- ja CurrentY- ominaisuusasetuksien määrittämään sijaintiin.

Private Sub ReportHeader0_Print(Cancel As Integer, _     PrintCount As Integer)    Dim MyDate    MyDate = Date    Me.FontBold = True    ' Print report title in bold.    Me.Print("Sales Management Report")    Me.Print(MyDate)End Sub

Tarvitsetko lisäohjeita?

Haluatko lisää vaihtoehtoja?

Tutustu tilausetuihin, selaa harjoituskursseja, opi suojaamaan laitteesi ja paljon muuta.