GetStatusFont方法示例
2015-12-15 22:24:35   来源：   评论：0 点击：

下列示例在 对象AlarmSummaryOCX1中获得具有LO状态的报警的字体属性。

Dim sFontName As String

Dim bStrike As Boolean

Dim bUnderline As Boolean

Dim bBold As Boolean

Dim bItalic As Boolean

Dim iSize As Integer

sFontName = AlarmSummaryOCX1.GetStatusFont(3, bStrike, bUnderline, bBold, bItalic, iSize)