BottomTextFont

Returns or sets the font of BottomText (BottomText is the optional text below the bar code and bar code text, if any).


Syntax

BarCodeWiz1.BottomTextFont [ = font]


Examples

Example 1: Retrieve font name


Dim ftName As String
ftName = BarCodeWiz1.BottomTextFont.Name                   
 

Example 2: Set BottomTextFont


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

Example 3: Change current BottomTextFont size


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