.BackStyle Missing

[NeoPa]

I have a project I'm working on where I want to disable editing on a form in certain circumstances. To avoid confusing the operator, I would like to change the appearance of the form so that is visually different between the two modes. A sort of visual clue if you like.

I developed the following code, but I find that this won't compile (to my surprise) :

Private Sub chkLocked_AfterUpdate()
    Dim ctl As Object     'Same problem if done As Control
 
    With Me
        .AllowEdits = (Not .chkLocked)
        For Each ctl In .Detail.Controls
            .BackStyle = .chkLocked
        Next ctl
    End With
End Sub

The error message is "Method or data member not found" and the .BackStyle on line #7 is highlighted (yellow).

Does anyone have any explanation? I have checked various of the controls (TextBox; Label; ComboBox; CheckBox) and only CheckBox doesn't have this property.

[FishVal]

@ADezii
Hello, ADezii.

The 2nd argument of VBA.Collection. Add method is a text key which could be used instead of positional index in a way we are accustomed to.

ex:

    Dim col As VBA.Collection
    Set col = FormSections(Me)
 
    Debug.Print col(1).Name
    Debug.Print col("Detail").Name
    Debug.Print col!Detail.Name
 

If collection is for iteration only, then keys are of no use.

[NeoPa]

I appreciate the suggestions chaps.

As my desire is to keep the code simpler, I wouldn't go to the extent of writing a class for this, but the numeric indexes in a loop would be a technique that's preferable to my usage of specific names.

Neither is as tidy as the For ... Each though. I'm not sure why that is not provided by default. It seems quite inconsistent with all the other objects and collections available.

PS. For ... Each can also be used in simple arrays (I found out quite recently). Another reason why I found the lack of support for this in .Section curious.

Thanks for all suggestions anyway :)

[ADezii]

@FishVal
Thanks for the explanation, FishVal. Always a pleasure.