Mega Code Archive

 

Categories / VB.Net by API / System Drawing Text

 

InstalledFontCollection Families

Imports System.Globalization Imports System.Text Imports System.Collections Imports System.ComponentModel Imports System.Windows.Forms Imports System.Data Imports System.Drawing Imports System.Drawing.Text Imports System public class Tester    public Shared Sub Main    Dim family As FontFamily         Dim installedFonts As InstalledFontCollection = New InstalledFontCollection()         For Each family In installedFonts.Families             Console.WriteLine(family.Name)         Next family    End Sub End class