下列程序的功能是调用字体对话框来设置文本框字体，单击按钮弹出对话框后，按Cancel
键退出对话框，则
　Private Sub Command1_Click( )
　　CommonDialogl．CancelError=True
　　CommonDialogl．Flags=cdlCFEffects Or cdlDFBotb
　　CommonDialogl．Action=4
　　CommonDialogl．ShowFont
　　Text1.Font.Name=CommonDialogl．FontName
　　Text1．Font．Size=CommonDialogl．FontSize
　　Text1．Font．Bold=CommonDialog1．FontBold
　　Text1．Font．Italic=CommonDialog1．FontItalic
　　Text1．Font．Underline=CommonDialog1．FontUnderline
　　Text1．FontStrikethru=CommonDialog1．FontStrikethru
　　Text1．ForeColor=CommonDialog1．Color
　End Sub

A．Text1的字体不发生变化

B．Text1的字体发生变化

C．Text1的字体和颜色发生变化

D．程序出错!

要广泛宣传党和国家安全生产方针政策、法律法规和各级加强安全生产的重大举措，开展形式多样、内容丰富的（）文化活动。

A、企业

B、矿区

C、安全