Visual FOX9

Есть Grid
С полем типа CHECKBOX


Нужно сделать цикл, типа такого
Приведите пример пожалуйста... Ранее я делал в Visual Basic c GRIDEX так:


А как в Fisual FOX?

GRID.movefirst
while not GRID.eof()

if grid.column(1).value=1
* отмеченная позиция CHKBOX
......
endif

GRID.movenext

end