FOR EACH loPage IN THISFORM.PAGEFRAME1.PAGES FOR EACH loControl IN THISFORM.PAGEFRAME1..Controls MESSAGEBOX(loControl.NAME) NEXT loControl NEXT loPage