List all font family name : Font Collection « GUI « VB.Net Tutorial

1. VB.Net Tutorial
2. GUI
3. Font Collection

Imports System
Imports System.Drawing
Imports System.Collections
Imports System.ComponentModel
Imports System.Windows.Forms
Imports System.Globalization


public class Tester
   public Shared Sub Main
        Dim family As FontFamily
        For Each family In FontFamily.Families
            If family.IsStyleAvailable(FontStyle.Bold) = False Then Exit For

            Console.WriteLine(family.Name)
        Next family


   End Sub
End class

Aharoni
Andalus
Angsana New
AngsanaUPC
Arabic Transparent
Arial
Arial Black
Arial Narrow
Batang
BatangChe
Book Antiqua
Bookman Old Style
Browallia New
BrowalliaUPC
Comic Sans MS
Cordia New
CordiaUPC
Courier New
David
David Transparent
DilleniaUPC
Dotum
DotumChe
Estrangelo Edessa
EucrosiaUPC
Fixed Miriam Transparent
Franklin Gothic Medium
FrankRuehl
FreesiaUPC
Garamond
Gautami
Georgia
Gulim
GulimChe
Gungsuh
GungsuhChe
Haettenschweiler
Impact
IrisUPC
JasmineUPC
Kartika
KodchiangUPC
Latha
Levenim MT
LilyUPC
Lucida Console
Lucida Sans Unicode
Mangal
Marlett
Microsoft Sans Serif
MingLiU
Miriam
Miriam Fixed
Miriam Transparent