VB中如何对combobox的list各项分别设置不同字体?
发布网友
共2个回答
热心网友
楼主您好！
可以用这种方法试试，代码如下：
Option ExplicitPrivate Sub Combo1_Click()
Me.Combo1.FontName = Me.Combo1.Text
End Sub
Private Sub Form_Load()
Me.Combo1.AddItem "宋体"
Me.Combo1.AddItem "新宋体"
Me.Combo1.AddItem "隶书"
Me.Combo1.AddItem "幼圆"
End Sub
热心网友
这个不能实现，一个Combobox只能显示一种字体。
