Font
返回容器希望其嵌入控件默认使用的字体,类型为stdole.IFontDisp。只读。
语法:object.Font
- object
- 必需 求值为AmbientProperties对象的对象表达式。
未显式设置自身字体的控件应使用此字体显示文本,使其标题和标签与周围容器的排版匹配。返回的IFontDisp公开Name、Size、Bold、Italic和Underline等属性。
示例
此示例响应环境Font更改并将其应用于控件的标题字体。
vb
Private Sub UserControl_AmbientChanged(PropertyName As String)
Select Case PropertyName
Case "Font"
Set UserControl.Font = Ambient.Font
End Select
End Sub