Ruang - hapus

        'isi pesan ketika tombol hapus diklik
        Dim pesan As String = MsgBox("Yakin akan menghapus data ini ?", vbYesNo, "")

        If pesan = vbYes Then 'jika pilih Yes
            ruang.hapus(dgvRuang.CurrentRow.Cells(0).Value) 'jalankan perintah hapus
            ruang.tampil() 'refresh data
        End If
        bersih()