Barcodes in Excel

Barcodes in Word

Barcodes in Access

More Tutorials

User Manual

Description

Returns or sets the font of TopText (TopText is the optional text above the bar code).

Syntax

BarCodeWiz1.TopTextFont [ = font]

Examples

Example 1: Retrieve font name


Dim ftName As String
ftName = BarCodeWiz1.TopTextFont.Name                   

Example 2: Set TopTextFont


Dim f As StdFont
Set f = New stdole.StdFont
f.Name = "Times New Roman"
f.Size = 16
Set BarCodeWiz1.TopTextFont = f     

Example 3: Change current TopTextFont size


Dim f As StdFont
Set f = New stdole.StdFont
Set f = BarCodeWiz1.TopTextFont 
f.Size = 14
Set BarCodeWiz1.TopTextFont = f