下图是应用程序的窗体,要求用户选中复选框Check1后,文本框Text1中的文字以粗体显示,选中复选框Check2后,文本框Text1中的文字以斜体显示,单击“关闭”按钮Command1后结束应用程序运行。
Private Sub Check1_ Click () if 【11】 then Text1. FontBold = True Else Text1. FontEold = 【12】 End ifEnd SubPrivate Sub check2_ click() if 【13】 then Text1. FontItalic = False Else Text1. FontItalic = True End ifEnd subPrivate Sub Command1_ Click() 【14】 MeEnd Sub