DIM
aString
AS
String
FOR EACH
aString
IN
Fonts
...
NEXT
Not documented