Private Sub dgvFindProduct_CellMouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles dgvFindProduct.CellMouseDown
If e.RowIndex = -1 Then Exit Sub
With dgvFindProduct
txtUnitInStock.Text = .Rows.Item(e.RowIndex).Cells("UnitInstock").Value.ToString()
txtUnitPrice.Text = .Rows.Item(e.RowIndex).Cells("UnitPrice").Value.ToString()
End With
End Sub