ThisForm.Grid1.DoScroll(1) skip 1 ThisForm.Grid1.setfocus thisform.refresh
>FOR lnXX = 1 TO 7 > This.grdSchedule.DoScroll(1) >ENDFOR >This.grdSchedule.Refresh() >