Visual Basic - 輸入執行DataGridView CellContentClick

Question

首先，我想潛在道歉，因爲我是新的Visual Basic（自學），所以我的一些代碼可能看起來很奇怪。

我加載一個DataGridView的信息由SELECT語句填充，當我點擊視圖內的某個單元格時，它會加載一個新的表單，這很好。不過，我想知道是否有方法可以將點擊更改爲「ENTER」鍵。

我附上我的代碼，希望這有助於。

預先感謝您

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown 
    If e.KeyCode = Keys.Enter Then ' not sure on code here 
End Sub 

Private Sub DataGridView1_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellContentClick 
    If Update_Detail.Visible = True Then Update_Detail.Close() 
    Dim istat As Object 
    If e.RowIndex > -1 Then istat = DataGridView1.Rows(e.RowIndex).Cells(0).Value 
    If e.ColumnIndex < 1 And e.RowIndex > -1 Then Update_Detail.TextBox1.Text = istat 
    If e.ColumnIndex < 1 And e.RowIndex > -1 Then Update_Detail.Show() 
End Sub 

而且我使用Visual Studio 2015 .Net框架4.5.2

Answer 1

Private Sub DataGridView1_KeyDown(sender As Object, e As KeyEventArgs) Handles DataGridView1.KeyDown 
     If e.KeyCode = Keys.Enter Then 

      Dim currentRowIndex As Integer = DataGridView1.CurrentCell.RowIndex 
      Dim currentColumnIndex As Integer = DataGridView1.CurrentCell.ColumnIndex 


      Dim istat As Object 

      If currentRowIndex > -1 Then istat = DataGridView1.Rows(currentRowIndex).Cells(0).Value 
      If currentColumnIndex < 1 And currentRowIndex > -1 Then Update_Detail.TextBox1.Text = istat 
      If currentColumnIndex < 1 And currentRowIndex > -1 Then Update_Detail.Show() 

     End If 

    End Sub