[VB6] Impostare proprietà di più controlli

[Seyen]

Una domanda. Vorrei poter impostare per una serie di textbox presenti su un Frame la proprietà Locked.
Io volevo usare questo codice

Dim ctl As Control
For Each ctl In Frame3.Container
If TypeOf ctl Is TextBox Then
ctl.Locked = False
End If
Next

Solo che invece di impostarlo ai textbox del Frame3 lo fa per tutti gli altri controlli sulla form...dove sbaglio?

[oregon]

    For Each ctl In Controls
        If (TypeOf ctl Is TextBox) And (ctl.Container Is Frame3) Then
            ctl.Text = "OK"
        End If
    Next

[Seyen]

Come ho fatto a non pensarci

Thanks