Заполнение DataGridView при выделении строки другого Grid-а

Private Sub FillIngr()
Try
Dim comand As New SqlCeCommand("SELECT ing_id, ing_name as [Наименование], ing_kol as [Кол-во], od_name as [Ед.изм.] FROM ingr INNER JOIN recipe ON ing_rec=rec_id INNER JOIN odvm ON ing_odv=od_id WHERE ing_rec = " & GridViewRecipe.CurrentRow.Cells(0).Value, db)
Dim adapter As New SqlCeDataAdapter(comand)
Dim dataset As New DataSet
adapter.Fill(dataset, "ingrid")
With GridViewIng
           .DataSource = dataset
           .DataMember = "ingrid"
End With
GridViewIng.Columns(0).Visible = False
GridViewIng.DefaultCellStyle.ForeColor = Color.Blue
Catch FillIngrErr As Exception
MsgBox(FillIngrErr.Message, , "Ошибка чтения ингредиентов")        
End Try
End Sub

Private Sub GridViewRecipe_CellEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles GridViewRecipe.CellEnter
FillIngr()
GroupBox3.Text = " Состав рецепта " & GridViewRecipe.CurrentRow.Cells(1).Value
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: This line of code loads data into the 'RecipeDBDataSet.ListRecipe' table. You can move, or remove it, as needed.
Me.ListRecipeTableAdapter.Fill(Me.RecipeDBDataSet.ListRecipe)
End Sub