下图是应用程序的窗体,要求用户选中复选框Check1后,文本框Text1中的文字以粗体显示,选中复选框Check2后,文本框Text1中的文字以斜体显示,单击“关闭”按钮Command1后结束应用程序运行。

Private Sub Check1_ Click ()
if 【11】 then
Text1. FontBold = True
Else
Text1. FontEold = 【12】
End if
End Sub
Private Sub check2_ click()
if 【13】 then
Text1. FontItalic = False
Else
Text1. FontItalic = True
End if
End sub
Private Sub Command1_ Click()
【14】 Me
End Sub