intercept only picturebox in frame1

[sal21]

is this correct?

Code: Select all

Private Sub LOOP_PICTUREBOX()

Dim CNTRL As Control
For Each CNTRL In Controls
   If CNTRL.Container.Name = "Frame1" Then
   If CNTRL.Type = "PicrtureBox" Then Stop
   End If
Next

End Sub

nOTE:
In frame1 i can have also a labels

[HansV]

"PicrtureBox" should be "PictureBox"