You can use the System.Drawing.Text.InstalledFontCollection to list the installed fonts. Here is a really easy way to put these in a combobox. Hope it helps...
Imports
System.Drawing.Text
Public
Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim fonts As New System.Drawing.Text.InstalledFontCollection
fontnames
NeGRoiDe
Public NotInheritable Class InstalledFontCollection
Inherits
System.Drawing.Text.FontCollectionMember of:
System.Drawing.TextSummary:
Represents the fonts installed on the system. This class cannot be inherited.
EDIT:
Sorry Christopher for the double post...ya got me by a minute there...went to copy and paste
sunrunner
Hello.
You can use the System.Drawing.Text.InstalledFontCollection to list the installed fonts. Here is a really easy way to put these in a combobox. Hope it helps...
Imports
System.Drawing.TextPublic
Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim fonts As New System.Drawing.Text.InstalledFontCollectionComboBox1.DataSource = fonts.Families
ComboBox1.DisplayMember =
"Name" End SubEnd
Class