Jag har letat runt efter hur man snyggt och smidigt listar upp alla teckensnitt i en combo box i vb.net. Det verkar inte vara som i gamla vb 6, så jag undrar om det finns någon som vet hur det går till?
En bonus skulle det ju vara om någon också kunde visa ett smidigt sätt att lista upp deras namn med deras egna stil i combon.

du menar typ http://www.vbaccelerator.com/home/NET/Code/Controls/ListBox_and_ComboBox/Font_Picker/article.asp

jo.. men det verkar hänga mycket på C#-kod.. =P.. hmm

för övrigt så verkar det som att jag dessutom har trubbel med att ändra fontstorlek i textboxen...
Tex såhär:

        Dim keff As Single = 12
        Texten.SelectionFont = New Font(Texten.SelectionFont, keff)

Jahapp.. verkade inte som att någon hittade ett bra svar, men jag pillade lite extra själv och lyckades iaf komma fram till något som fungerar bra.
Så här blev koden för att lista alla fonts i combo-boxen för mig (Texten är en rich textbox)

        Dim oFF As Drawing.FontFamily
        Dim mFC As New FontConverter

        comFont.Items.Clear() 'töm combo-boxen så den inte bara fylls på med samma igen
        For Each oFF In System.Drawing.FontFamily.Families 'så går man igenom alla fonts i systemet
            If oFF.IsStyleAvailable(FontStyle.Regular) = False Then
                'De här fontsen går inte att lista in?
            Else
                'Bra font som fungerar, lägg in den =)
                comFont.Items.Add(oFF.Name)
                'comFont.Font = mFC.ConvertFromString(oFF.Name)
            End If
        Next