[VB6] Impostare proprietà di più controlli

[oregon]

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