vb中如何切换字体的斜体与非斜体

VB使用FontItalic属性，返回或设置字体样式：斜体（Italic）或者使用Italic属性来返回或设置 Font 对象的字形为斜体或非斜体。

FontBold、FontItalic、FontStrikethru、FontUnderline
属性

按下述格式返回或设置字体样式：Bold、Italic、Strikethru 和 Underline。

语法




代码示例：

Private Sub Command1_Click()

    Static i As Integer

    i = i + 1

    If i = 1 Then

        Text1.FontItalic = True ‘为斜体

    ElseIf i = 2 Then

        Text1.FontItalic = False   '非斜体

        i = 0

    End If

End Sub

Italic 属性，返回或设置 Font 对象的字形为斜体或非斜体。



代码实例：

Private Sub Command2_Click()

    Text1.Font.Italic = Not Text1.Font.Italic

End Sub