If e.KeyChar = ChrW(Keys.Enter) Then
        DataGridView1.CurrentCell = DataGridView1.Rows(DataGridView1.CurrentRow.Index - 1).Cells(0)
        txtno.Text = DataGridView1.SelectedCells(0).Value
        
    End If
   
End Sub