What you want to do is a loop. For example. say this is a class file. And all your pictureboxes are already in objPboxes private objPboxes as object[] PUBLIC SUB Set_Pictures() DIM pb as picturebox for each pb in objPboxes pb.picture = "/path/to/picture" next END