Public Class MyDGV
    Inherits System.Windows.Forms.DataGridView
    Protected Overrides Function ProcessCmdKey(ByRef msg As Message, ByVal _
      keyData As Keys) As Boolean
        If keyData = Keys.Enter AndAlso Me.CurrentCell.ColumnIndex < _
        Me.ColumnCount - 1 Then
            Me.CurrentCell = Me(Me.CurrentCell.ColumnIndex + 1, _
            Me.CurrentRow.Index)
            Return True
        End If
        Return MyBase.ProcessCmdKey(msg, keyData)
    End Function
End Class