thisform.GridActiveRow = this.ActiveRowIn LostFocus Event of The textBox in Column4 put:
thisform.LockScreen = .t. thisform.Grid1.ActivateCell(thisform.GridActiveRow+1,2) thisform.Grid1.Refresh() thisform.LockScreen = .f.When You go to the last row in the Grid You will stay there.