ISMemo.Font

Description

The font of the specified memo control.

Syntax

object.Font

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

Return Value

StdFont

Example

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

Dim aMemo
Dim aMemoInfo

Set aMemo = Form.Controls_("memComment")
set aFont = aMemo.Font 

aMemoInfo =_
  "ShortName: " & aMemo.ShortName & vbNewLine &_
  "TypeName: " & aMemo.TypeName & vbNewLine &_
  "Font Name: " & aFont.Name & vbNewLine &_
  "Font Size: " & aFont.Size               
  
Profile.MsgBox(aMemoInfo)

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 memo control in the controls tree > Font.

Version information

Added in v7.8.0