DIM
aString
AS
String
FOR EACH
aString
IN
Fonts
...
NEXT
Enumerates the font families installed on the system.