VB字体设置

您想知道字体设置的代码吗？Private Sub Check1_Click() Text1.FontBold = Not Text1.FontBold End Sub Private Sub Check2_Click() Text1.FontItalic = Not Text1.FontItalic End Sub ......