[填空题] 通过选择组合框中的选项来改变文本框的字体。在窗体中添加一个组合框 (Combo1)和一个文本框(Text1)，代码如下。请填入适当的内容，将程序补充完整。 Private Sub Com

[填空题] 通过选择组合框中的选项来改变文本框的字体。在窗体中添加一个组合框 (Combo1)和一个文本框(Text1)，代码如下。请填入适当的内容，将程序补充完整。

Private Sub Combo1_Cliek()

Text1. FontName=Combo1. List(Combo1. Listlndex)

End Sub

Private Sub Form_Load()

With Combol

Addltem"宋体"

Addltem"隶书"

Addltem"黑体"

·Addltem"楷体_GB2312""

·Listlndex＝0

End With

Text1. 【8】 30

Textl. 【9】 =Combol.List(0)

End Sub

[8]FontSize[9]FontName

文本框的FontSize属性用来表示字体大小。FontName属性用来表示字体名称，如宋体、隶书等。