TIP: View System Fonts

Private Sub Command1_Click()
 Shell("rundll32.exe shell32.dll, _ 
 SHHelpShortcuts_RunDLL FontsFolder")
End Sub

This article was originally published on September 20, 2002