Get a List of ‘all’ available Fonts in VB.NET and Higher

Click Star to Rate Post
1 Star2 Stars3 Stars4 Stars5 Stars (No Ratings Yet)
 

This will get a list of all available font and add to a combobox or listbox control.


        '
        'This will get all of the available fonts on the computer and add them to the ‘cmbFont’ combobox control.
        '
        Dim f As System.Drawing.Text.InstalledFontCollection = New System.Drawing.Text.InstalledFontCollection()

        Dim fFamily As FontFamily

        For Each fFamily In f.Families

            lst.Items.Add(fFamily.Name)

        Next

Leave a Reply

Your email address will not be published.