[RESOLVED] Enumerate menus

[TheVader]

Probably a stupid question, but I can't find it... Can the menu's in a form be enumerated? There doesn't seem to be a Menus collection or something like that.

Dim x as Menu
For Each x In '???

Thanks.

[penagate]

Dim ctl As Control
For Each ctl In Me.Controls
    If TypeOf ctl Is Menu Then
        ' do something
    End If
Next ctl

[TheVader]

Brilliant... why didn't I think of that?

(And I still can't rate you...)

[penagate]

Brilliant... why didn't I think of that?

(And I still can't rate you...)

Basically everything is in .Controls, so using Typeof...Is, you can enumerate any type of control you want

edit: I think it is 10 people you have to rate before you can rate the same person again.

Edit: penagate is correct. Once you have repd someone, you must give reps to at least 10 different members before you are allowed to rep that person again. - Hack