List Installed Fonts : System Font « GUI « VB.Net

1. VB.Net
2. GUI
3. System Font

List Installed Fonts

Imports System
Imports System.Windows.Forms
Imports System.Drawing.Text
Imports System.Drawing

Public Class MainClass
    
    Shared Sub Main(ByVal args As String())
        ' Get the installed fonts collection.
        Dim installed_fonts As New InstalledFontCollection

        ' Get an array of the system's font familiies.
        Dim font_families() As FontFamily = installed_fonts.Families()

        ' Display the font families.
        For Each font_family As FontFamily In font_families
            Console.Write (font_family.Name & ", ")
        Next font_family
    End Sub
End Class



           
       

Related examples in the same category

1.	Get Installed Font and display one by one
2.	Display All font installed in your system
3.	Installed Font Collection in Your System
4.	Font Properties in Bigger Font size