How to Find installed fonts in a computer usign ?

Posted by Ranjeet_8 under VB.NET category on | Points: 40 | Views : 4553
Find installed font-family

Imports System.Text
Imports System.Drawing.Text
Imports System.Drawing

Protected Sub Page_Load(sender As Object, e As EventArgs)
Dim fontList As New InstalledFontCollection()
Dim sb As New StringBuilder()

For Each Family As FontFamily In fontList.Families
sb.Append(Family.Name + "<br/>")

End Sub

Comments or Responses

Login to post response