add button to gridview devexpress

Question

Dim index As Integer
        index = GridView1.GetFocusedRowCellValue("id")

        If (XtraMessageBox.Show("Bạn có chắc chắn muốn xoá dòng này không?", "Thông báo",
             MessageBoxButtons.YesNo) <> DialogResult.Yes) Then Return
        Dim view As GridView = TryCast(GridControl1.FocusedView, GridView)
        view.DeleteRow(view.FocusedRowHandle)
        view.UpdateCurrentRow()