lo he transformado a .net y nada...lo que hace esto es que me envía a la primera celda del grid + 1 no me envía a la celda que estaba seleccionada...ante todo gracias por la ayuda
Cita: Dim nRenglon As Int32 = Grid.CurrentRow.Index
Grid.CurrentCell = Me.Grid(0, nRenglon + 1)
así queda en net