For Each .Window.Controls (gb.qt4)

Dim hWindow As Window
Dim hControl As Control
For Each hControl In hWindow.Controls
  ...
Next

Enumerates each control that belongs to a window.