下列程序的功能是调用字体对话框来设置文本框字体,单击按钮弹出对话框后,按Cancel 键退出对话框,则( )。Private Sub Command1_Click( )CommonDialogl.CancelError=TrueCommonDialogl.Flags=cdlCFEffects Or cdlDFBotbCommonDialogl.Action=4CommonDialogl.ShowFontText1.Font.Name=CommonDialogl.FontNameText1.Font.Size=CommonDialogl.FontSizeText1.Font.Bold=CommonDialog1.FontBoldText1.Font.Italic=CommonDialog1.FontItalicText1.Font.Underline=CommonDialog1.FontUnderlineText1.FontStrikethru=CommonDialog1.FontStrikethruText1.ForeColor=CommonDialog1.ColorEnd Sub
A. Text1的字体不发生变化
B. Text1的字体发生变化
C. Text1的字体和颜色发生变化
D. 程序出错!