Article ID: 161359
Article Last Modified on 12/3/2003
i=1
FOR i = 1 to ThisForm.ControlCount
IF ThisForm.Controls(i).Class = "commandbutton" THEN
WAIT WINDOW ThisForm.Controls(i).Name
ELSE
WAIT WINDOW "This is not a Command Button: " + ;
ThisForm.Controls(i).Name
ENDIF
NEXT i
IF ThisForm.Controls(i).Class = "commandbutton" THENWith:
IF ThisForm.Controls(i).Class = "Commandbutton" THEN
Additional query words: VFoxWin kbdse VFoxMac
Keywords: KB161359