Highlights
All Snippets
Top 100 Snippets
Librarians
gbCodeLib

By Language
VB6
JavaScript
Perl
HTML
SQL
Java
DOS

GBIC >> Source Code >> Visual Basic >> Snippet

List all fonts


'put font list into comboBox
For i = 0 To Screen.FontCount - 1
  cmbFont.AddItem = Screen.Fonts(i)
Next i