选择字体的ComboBox 有一个ComboBox，在From1_Load下面的代码： Dim fontFamilies() As FontFamily Dim installedFontCollection As New InstalledFontCollection Dim i As Integer fontFamilies = installedFontCollection.Families For i = 0 To fontFamilies.Length - 1 cbbFont.Items.Add(fontFamilies(i).Name) Next cbbFont.Text = rtbOnly.Font.Name.ToString 怎样实现用cbbFont选择字体后把rtbOnly的字体变为选择的字体啊？ 急急急 __________________________________________________________________________ Font f = new Font(cbbFont.SelectText,12f); rtbOnly.Font = f; __________________________________________________________________________ Me.Font = New Font(cbbFont.SelectText,12) __________________________________________________________________________ 原文链接：https://www.f2er.com/vb/263974.html