Different output from same coding vb.net - visual-studio

Question

im new here and want asking one question.
i have form with button that when clicked will fill database, but when im using keydown event the result is different.
here is the result, red box from click button and the green one from keydown event.
enter image description here
here is my code
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If TextBox1.Text = "" Or TextBox2.Text = "" Then
MsgBox("Masukan kode dan nama sub kelompok terlebih dahulu")
Else
For baris As Integer = 0 To DataGridView1.Rows.Count - 2
Dim inputsub As String = "insert into mastersubkelompok values('" & DataGridView1.Rows(baris).Cells(0).Value & "','" & DataGridView1.Rows(baris).Cells(1).Value & "','" & DataGridView1.Rows(baris).Cells(2).Value & "','" & TextBox1.Text & "')"
CMD = New OleDbCommand(inputsub, CONN)
CMD.ExecuteNonQuery()
MsgBox("Data berhasil di input")
Call kondisiawal()
Next
End If
End Sub
Private Sub SubKelompok_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown, DataGridView1.KeyDown
If e.KeyCode = Keys.F2 Then
If TextBox1.Text = "" Or TextBox2.Text = "" Then
MsgBox("Masukan kode dan nama sub kelompok terlebih dahulu")
Else
For baris As Integer = 0 To DataGridView1.Rows.Count - 2
Dim inputsub As String = "insert into mastersubkelompok values('" & DataGridView1.Rows(baris).Cells(0).Value & "','" & DataGridView1.Rows(baris).Cells(1).Value & "','" & DataGridView1.Rows(baris).Cells(2).Value & "','" & TextBox1.Text & "')"
CMD = New OleDbCommand(inputsub, CONN)
CMD.ExecuteNonQuery()
MsgBox("Data berhasil di input")
Call kondisiawal()
Next
End If
End If
End Sub