下列程序的功能是调用字体对话框米设置文本框中的字体，单击Command1按钮弹出对话框，进行相应的字体、字号等的设置，然后单占“确定”按钮退出对话框，则将发生哪些变化( )。
Private Sub Command1_Click()
Common Dialog1.Cancel Error=True
Common Dialog1.Flags=3
On Error Resume Next
Common Dialog1.ShowFont
Text1.Font.Name=CommonDialog1.FontName
Text1.Font.Size=CommonDialog1.FontSize
Text1.Font.Bold=CommonDialog1.FontBold
Text1.Font.Italic=CommonDialog1.FontItalic
Text1.Font.Underline=CommonDialog1.FontUndeline
Text1.FontStrikethru=CommonDialog1.FontStrikethru
Text1.ForeColor=CommonDialog1.Color
End Sub