comp • gb.data • .graph.adjacent • _next

For Each .Graph.Adjacent (gb.data)

Dim hGraph As Graph
Dim aString As String
For Each aString In hGraph.Adjacent
  ...
Next