ISButton.Font

Description

The font of the specified button.

Syntax

object.Font

Part	Attribute	Type	Description
`object`	Required	ISButton	The `object` always implements the ISButton interface

Return Value

StdFont

Example

Display some information about the specified button, including its font name and font size.

Dim aButton
Dim aFont
Dim aControlInfo

Set aButton = Form.Controls_("btnDemo")
set aFont = aButton.Font
aControlInfo =_
  "Caption: " & aButton.Caption & vbNewLine &_ 
  "Tag: " & aButton.Tag & vbNewLine &_
  "ShortName: " & aButton.ShortName & vbNewLine &_
  "TypeName: " & aButton.TypeName & vbNewLine &_
  "Is Visible: " & aButton.isVisible & vbNewLine &_
  "Font Name: " & aFont.Name & vbNewLine &_
  "Font Size: " & aFont.Size 
    
Profile.MsgBox(aControlInfo)

Note: This macro should be executed in any event handler of the form control.

In Profile Client v8 on User Interface Font can be found in Maintain > Templates > Health Record Collection Templates > Open the selected form template > Open form editor > Object Inspector > Select the button in the controls tree > Font.

Version information

Added in v7.8.0