สอบถามเรื่องการเพิ่มกดปุ่มใน Datagridview ให้สามารถใช้งานได้

Private Sub btn_AddPro_Click(sender As Object, e As EventArgs) Handles btn_AddPro.Click
        If txtProName.Text <> "" And txtamount.Value <> 0 And txtProPrice.Text <> "" Then
            For i As Integer = 0 To dgvshow.Rows.Count - 1
                If txtProName.Text = dgvshow.Rows(i).Cells(2).Value.ToString Then
                    MessageBox.Show("มีรายการแล้ว", "ผลการดำเนินการ", MessageBoxButtons.OK, MessageBoxIcon.Warning)
                    Exit Sub
                End If
            Next
            dgvshow.Rows.Add()
            dgvshow.Rows(dgvshow.Rows.Count - 1).Cells(0).Value = dgvshow.Rows.Count
            dgvshow.Rows(dgvshow.Rows.Count - 1).Cells(1).Value = txtProID.Text '--รหัสสินค้า
            dgvshow.Rows(dgvshow.Rows.Count - 1).Cells(2).Value = txtProName.Text '--ชื่อสินค้า
            dgvshow.Rows(dgvshow.Rows.Count - 1).Cells(3).Value = txtamount.Value.ToString("#,##0.00") '--จำนวน
            dgvshow.Rows(dgvshow.Rows.Count - 1).Cells(4).Value = CDbl(txtProPrice.Text).ToString("#,##0.00") '--ราคา
            dgvshow.Rows(dgvshow.Rows.Count - 1).Cells(5).Value = CDbl(txtamount.Value).ToString("#,##0.00") * CDbl(txtProPrice.Text).ToString("#,##0.00") '--ราคารวม
            dgvshow.Refresh()
            txtProID.Text = ""
            txtProName.Text = ""
            txttotal.Text = CDbl(txttotal.Text + (txtamount.Value * CDbl(txtProPrice.Text))).ToString("#,##0.00")  '--ราคารวมทั้งหมด
            txtamount.Value = 0
            txtProPrice.Text = ""

        ElseIf txtProName.Text = "" Then
            MessageBox.Show("กรุณาเลือกรายการสินค้า", "ผลการดำเนินการ", MessageBoxButtons.OK, MessageBoxIcon.Warning)
        Else
            MessageBox.Show("กรุณาเลือกจำนวนที่ต้องการ", "ผลการดำเนินการ", MessageBoxButtons.OK, MessageBoxIcon.Warning)
        End If
    End Sub