Click here to Skip to main content
15,795,793 members
Please Sign up or sign in to vote.
0.00/5 (No votes)
See more:
Hello guys Can you help me out by telling me how to add all my computer fonts to combobox?

Dim fnts As New InstalledFontCollection
For Each f As FontFamily In fnts.Families()

further reading Find all installed fonts[^]
Share this answer
Sergey Alexandrovich Kryukov 29-Jun-12 12:35pm    
Correct, a 5.
Need not to add....... Already all the fonts are available in properties column of ComboBox...........
Share this answer
Simon_Whale 13-Jan-12 7:55am    
That is the font style for displaying the text not for adding the name of the font to the combo box.
Sergey Alexandrovich Kryukov 29-Jun-12 12:35pm    
Correct. And you answer is correct, my vote of 5. Unfortunately, the question was not understood; I just have to vote 1 for this one.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

CodeProject, 20 Bay Street, 11th Floor Toronto, Ontario, Canada M5J 2N8 +1 (416) 849-8900