combobox字体初始化代码看不懂？
Private Sub InitFontNameCombo(ByRef cbo As ComboBox)
Dim i, j As Integer
Dim fontFamilies() As FontFamily
Dim FontInstalled As New System.Drawing.Text.InstalledFontCollection
fontFamilies = FontInstalled.Families
cbo.DataSource = fontFamilies
cbo.DisplayMember = "Name "
cbo.ValueMember = "Name "
cbo.SelectedValue = Me.Font.FontFamily.Name
End Sub
这段代码哪规定初始化字体为宋体的啊，我看了半天不明白？
[解决办法]
因为窗体的默认字段为“宋体”：Me.Font.FontFamily.Name
cbo.SelectedValue = Me.Font.FontFamily.Name这句代码就将字体设成了宋体，不信你把这名代码注释后执行看看。
[解决办法]
楼上正确
