【单选题】

下列程序的功能是：调用字体对话框来设置文本框中的字体，单击Command1按钮弹出对话框，进行相应的字体、字号等的设置，然后单击。“确定”按钮退出对话框，则将发生哪些变化()。

Private SubCommand1_Click()
CommonDialogl.CancelError=True
CommonDialogl.Flags=3
OnError Resume Next
CommonDialogl.ShowFont
Textl.Font.Name=CommonDialogl.FontName
Textl.Font.Size=CommonDialogl.FontSize
Textl.Font.Bold=CommonDialogl.FontBold
Textl.Font.Italic=CommonDialogl.FontItalic
Textl.Font.Underline=CommonDialogl.FontUnderline
Textl.FontStrikethru=CommonDialogl.FontStrikethru
Textl.ForeColor=CommonDialogl.Color
End Sub
A．Text1的字体不发生变化
B．Text1的字体发生变化
C．Text1的字体和颜色发生变化
D．程序出错