How to Find installed fonts in a computer usign vb.net ?

Ranjeet_8
Posted by Ranjeet_8 under VB.NET category on | Points: 40 | Views : 4037
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/>")
Next

Response.Write(sb.ToString())
End Sub

Comments or Responses

Login to post response