Gets and sets the italic state of the font. | |
Syntax: | Boolean =
object.Italic object.Italic = Boolean |
Description: | The Italic property switches the font
between normal and Italic. Example: Sub GefFontFormat_Italic() Dim oCimObj As GefObject Dim oCimObjTxtFmt As
GefTextFormat Dim oCimObjFntFmt As
GefFontFormat Set oCimObj = CimGetObject Set oCimObjTxtFmt =
oCimObj.TextFormat If Not oCimObjTxtFmt Is Nothing
Then Set
oCimObjFntFmt = oCimObjTxtFmt.Font If Not
oCimObjFntFmt Is Nothing Then oCimObjFntFmt.Italic
= gefStateTrue CimGetScreen.Refresh
False End
If End If End Sub |