FontBold (vet), eigenschap

Van toepassing op

ComboBox-object

Report-object

CommandButton-object

TabControl-verzameling

FormatCondition-object

TextBox-object

Label-object

ToggleButton-object

ListBox-object

Met de eigenschap FontBold kunt u opgeven of een lettertype vetgedrukt moet worden weergegeven in de volgende situaties:

  • Bij het weergeven of afdrukken van besturingselementen in formulieren en rapporten.

  • Als u de methode Afdrukken gebruikt in een rapport.

Opmerkingen

De eigenschap FontBold gebruikt de volgende instellingen.

Instelling

Beschrijving

True

De tekst is vet.

False

(Standaard) De tekst is niet vet.


Opmerking: U kunt de eigenschap FontBold alleen instellen met een macro of VBA-code (Visual Basic for Applications).

Als u de eigenschap FontBold in een rapport wilt gebruiken, maakt u eerst een gebeurtenisprocedure voor afdrukken waarmee de gewenste tekst wordt afgedrukt.

De weergave van een lettertype op het scherm en op een afdruk kan verschillen, afhankelijk van de computer en printer.

De eigenschap FontWeight, die beschikbaar is in het eigenschappenvenster voor besturingselementen, kan ook worden gebruikt om de lijndikte voor de tekst van een besturingselement in te stellen. Met de eigenschap FontBold kunt u snel tekst vet maken en met de eigenschap FontWeight kunt u de instelling voor de lijndikte van tekst verder verfijnen. In de onderstaande tabel ziet u de relatie tussen de instellingen van deze eigenschappen:

Als

Dan gebeurt het volgende

FontBold = False

FontWeight = Normaal (400)

FontBold = True

FontWeight = Vet (700)

FontWeight < 700

FontBold = False

FontWeight > = 700

FontBold = True


Voorbeeld

Met de volgende gebeurtenisprocedure Afdrukken worden een rapporttitel en de huidige datum vet afgedrukt in een rapport op de coördinaten die zijn opgegeven met de instellingen van de eigenschappen HuidigeX en HuidigeY.

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
Uw Office-vaardigheden uitbreiden
Training verkennen
Als eerste nieuwe functies krijgen
Deelnemen aan Office Insiders

Was deze informatie nuttig?

Bedankt voor uw feedback.

Hartelijk dank voor uw feedback! Het lijkt ons een goed idee om u in contact te brengen met een van onze Office-ondersteuningsagents.

×