![[填空题] 下列程序的作用是使用字体对话框修改文本框字体的样式，完成下列程序。 Private Sub Command1_Click()CommonDialog1.CanceIError=TrueO](http://www.mshxw.com/aiimages/31/252774.png "[填空题] 下列程序的作用是使用字体对话框修改文本框字体的样式，完成下列程序。 Private Sub Command1_Click()CommonDialog1.CanceIError=TrueO")
[填空题] 下列程序的作用是使用字体对话框修改文本框字体的样式，完成下列程序。
Private Sub Command1_Click()
CommonDialog1.CanceIError=True
On ErrorGo To ErrHandler
CommonDialog1.Flags=vbCFEffects Or vbCFBoth
CommonDialog1.______
Text1.Font Name=CommonDialog1.FontName
Text1.Font.Size=______
Text1.Font.Bold=CommonDialog, FontBold
Text1.Font.Italic=CommonDialog1Fontltalic
Text1.Font.Underline=______
Text1.FontStrikethru=CommonDialog1.FontStrikethru
Exit Sub
ErrHandler：
End Sub
参考答案：
ShowFont；CommonDialog1.FontSize；CommonDia-log1.FontUnderline问题解析:
解析无
