panggil hapus()

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
    Dim pesan As String = MsgBox("Anda yakin?", vbYesNo)

    If pesan = vbYes Then
        crud.hapus(dgvData.CurrentRow.Cells(0).Value)
    End If
End Sub