منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : التعامل مع الزر الموجود في DataGrideView هل يستطيع حذف الصف الذي به البتن
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
عندي حقل في الداتا قريد فيو  ازرار 
انا اريد عندما انقر على الزر ان يقوم بحذف الصف الذي يوجد به الزر هل من افادة؟
بالامكان استخدام البروسيجر التالي:
PHP كود :
Public Sub DGVDeleteRecord(ByVal Cellindex As Int16ByVal DGV As DataGridView)
 
       Try
            If DGV
.CurrentCell.RowIndex DGV.NewRowIndex.ToString Then
                Exit Sub
            ElseIf DGV
.CurrentCell.ColumnIndex.ToString Cellindex Then
                Dim msg 
As Short MessageBox.Show("سيتم حذف القيد الحالي .. هل أنت متاكد؟""تأكيد"MessageBoxButtons.YesNoMessageBoxIcon.Warning_
                    MessageBoxDefaultButton
.Button2MessageBoxOptions.RtlReading)
 
               If msg 6 Then
                    DGV
.Rows.RemoveAt(DGV.CurrentCell.RowIndex)
 
               End If
 
           End If
 
       Catch ex As Exception
            MsgBox
(ex.MessageMsgBoxStyle.Critical"خطأ")
 
       End Try
 
   End Sub 

و في حدث (CellClick) للـ (DataGridView) ضع السطر التالي:
PHP كود :
Try
 
           If RetainedAmountsDGV.CurrentCell.ColumnIndex 4 Then
                DGVDeleteRecord
(4DataGridView1)
 
           End If
 
       Catch ex As Exception
            MsgBox
(ex.MessageMsgBoxStyle.Criticalmsgboxtitle)
 
       End Try 

مع تغيير فهرست العمود حسب ما موجود عندك اي تغيير الرقم (4) الى (Index) العمود المستخدم للحذف , و تغيير اسم (DataGridView1) الى الاسم المستخدم عندك للـ (DataGridView)

تحياتي ..