Need a query to obtain a count

[GraeagleBill]

One would think the compiler would know me well enough to realize I was in "meant to" mode



The problem turned out to be that the property sheet for the controls involved had their Tag property set to "HL?", so the code needed to wrap ctl.Tag to """HL?""" when inquiring its value.

Thanks Paul and ridders52

[pbaldy]

You have to use Like with a wildcard, not =.

[pbaldy]

Oops, didn't see there was a second page. Glad you got it sorted Bill.

[GraeagleBill]

Why the wildcard? Doesn't ctl.Tag Like "HL?" get the job done?

[GraeagleBill]

Below is the function I finished with:

Private Function ChgCount() As Integer
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*
'*  Fields of interest have their Tag property set to the string "HL?".  Loop through
'*  the current form's controls collection and examine the TRUE/FALSE state of its
'*  "Chg" companion in the current record and add to the count if found to be TRUE.
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*
Dim ctl As Control

ChgCount = 0

For Each ctl In Me.Controls
    If ctl.Tag = """HL?""" Then
        If Me(Replace(ctl.Name, "tb", "chg")) Then _
        ChgCount = ChgCount + 1
    End If
Next ctl

End Function

[pbaldy]

I misunderstood, "?" is a single character wildcard and I thought you were trying to match anything with HL and a single extra character.

[isladogs]

I use the tag property regularly.
Suggest you don't use " or ? as part of a tag value.
Why not just use HL as the tag?