For Each Fonts (gb.gui)

Dim aString As String
For Each aString In Fonts
  ...
Next