Getting control properties

[tg2003]

Hello,

I'm looking for a way to retrieve all comboboxes in a form and filtering the visibled only.

I'm using a control "for-each" loop. "TypeOf" statement is working, but I can't find how to filter the visible. Is is possible?

Attached is my code.
Thanks

Dim ctrl As Control
    
    For Each ctrl In Me.Controls
       If TypeOf ctrl Is ComboBox And ctrl.Visible = True Then
            MsgBox (ctrl.text)
       End If
   Next ctrl

 

[three57m]

Your code appears to work to me.

 

[tg2003]

I forgot to emphasize that

ctrl.Visible

does not working, and I'm looking for a way to use it.

 

[SBerthold]

Are the control's containers visible when you do this?

 

[AnuragShrivastava]

Have u written ur code in an event when the combo boxes are not visible. e.g. Form_Load event.

If so try putting it somewhere else e.g. FOrm_Activate

 

[tg2003]

I found the reason.

I must split out the "if" condition, and I understand why. It has to be like this:

Dim ctrl As Control
    
    For Each ctrl In Me.Controls
       If TypeOf ctrl Is ComboBox Then
            Ifc trl.Visible = True Then
                 MsgBox (ctrl.text)
            End If
       End If
   Next ctrl

Thank you anyway!!