How to move only Current Row Column(4) and Column(5) using Enter Key in datagridview for VB.Net

Question

I have facing some problem in datagridview current row movement. I want entry some number in Column(4) then press Enter key then next focus to Column(5) entry somthing then press Enter key add new row then focus. I was write some code. Someone know please correction or edit it.

Private Sub DGV1_CellValidating(sender As Object, e As DataGridViewCellValidatingEventArgs) Handles DGV1.CellValidating
        Dim Err As Boolean
        For Each row As DataGridViewRow In DGV1.Rows
            If row.Cells("Qty").Value = String.Empty Then
                Err = True
                Exit For
            End If
        Next row
End Sub

 Private Sub DGV1_KeyDown(sender As Object, e As KeyEventArgs) Handles DGV1.KeyDown

 If e.KeyCode = Keys.Enter Then

            Dim vw As DataGridView = DirectCast(sender, DataGridView)
            'check for last row
            If vw.CurrentCell.RowIndex = vw.Rows.Count - 1 Then
                'if it's not the last cell, move to the next one
                If vw.CurrentCell.ColumnIndex <> vw.ColumnCount - 1 Then
                    vw.CurrentCell = vw.Rows(vw.CurrentCell.RowIndex).Cells(vw.CurrentCell.ColumnIndex + 1)
                Else
                    ' if last cell then either enter new raw or move to first cell.
                    'move to first column in new row
                    vw.Rows.Add(1)
                    vw.Refresh()
                    SendKeys.Send("{HOME}")
                End If
            Else
                'if it's the last cell, move to the next row, first cell
                If vw.CurrentCell.ColumnIndex = vw.ColumnCount - 1 Then
                    vw.CurrentCell = vw.Rows(vw.CurrentCell.RowIndex + 1).Cells(0)
                Else
                    'move to the next cell on the current row
                    vw.CurrentCell = vw.Rows(vw.CurrentCell.RowIndex).Cells(vw.CurrentCell.ColumnIndex + 1)
                End If
            End If
            'mark the keycode as handled
            e.Handled = True
        End If
End Sub

Answer

Hi @dopen oinam ,

You can try to override ProcessCmdKey method to replace datagridview keydown event to move the cell focus correctly.

Code:

 Protected Overrides Function ProcessCmdKey(ByRef msg As Message, ByVal keyData As Keys) As Boolean  
        If keyData = Keys.Enter Then  
  
            'check for last row  
            If DataGridView1.CurrentCell.RowIndex = DataGridView1.Rows.Count - 1 Then  
                'if it's not the last cell, move to the next one  
                If DataGridView1.CurrentCell.ColumnIndex <> DataGridView1.ColumnCount - 1 Then  
  
                    DataGridView1.CurrentCell = DataGridView1.Rows(DataGridView1.CurrentCell.RowIndex).Cells(DataGridView1.CurrentCell.ColumnIndex + 1)  
  
  
                Else  
                        ' if last cell then either enter new raw or move to first cell.  
                        'move to first column in new row  
                        DataGridView1.Rows.Add(1)  
                    DataGridView1.Refresh()  
                    SendKeys.Send("{HOME}")  
                End If  
            Else  
                'if it's the last cell, move to the next row, first cell  
                If DataGridView1.CurrentCell.ColumnIndex = DataGridView1.ColumnCount - 1 Then  
                    DataGridView1.CurrentCell = DataGridView1.Rows(DataGridView1.CurrentCell.RowIndex + 1).Cells(0)  
                Else  
                    'move to the next cell on the current row  
                    DataGridView1.CurrentCell = DataGridView1.Rows(DataGridView1.CurrentCell.RowIndex).Cells(DataGridView1.CurrentCell.ColumnIndex + 1)  
                End If  
            End If  
  
  
        End If  
        Return MyBase.ProcessCmdKey(msg, keyData)  
  
    End Function  
  
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load  
        DataGridView1.ColumnCount = 5  
        DataGridView1.Columns(0).Name = "Product ID"  
        DataGridView1.Columns(1).Name = "Product Name"  
        DataGridView1.Columns(2).Name = "Product_Price"  
        DataGridView1.Columns(3).Name = "Product_Address"  
        DataGridView1.Columns(4).Name = "Product_Owner"  
  
        Dim row As String() = New String() {"1", "Product 1", "1000", "test1", "o1"}  
        DataGridView1.Rows.Add(row)  
        row = New String() {"2", "Product 2", "2000", "test2", "o2"}  
        DataGridView1.Rows.Add(row)  
        row = New String() {"3", "Product 3", "3000", "test3", "o3"}  
        DataGridView1.Rows.Add(row)  
        row = New String() {"4", "Product 4", "4000", "test4", "o4"}  
        DataGridView1.Rows.Add(row)  
    End Sub

Result:

Share via

How to move only Current Row Column(4) and Column(5) using Enter Key in datagridview for VB.Net

1 answer

Your answer