منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
checkbox في داتاكرد فيو - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : checkbox في داتاكرد فيو (/showthread.php?tid=42074)

checkbox في داتاكرد فيو - mohamedassim - 02-08-22

السلام عليكم ورحمة الله وبركاته
لدي داتا كرد فيو فيها عمود عبارة عن checkbox  اريد ان احفظ السجلات التي تم تحديد الجيكبوكس لها true

ما الخطا في الكود الذي استخدمته
حيث انه يحفظ جميع الصفوف الظاهر في الجيكبوكس ولا نفذ الشرط

RE: checkbox في داتاكرد فيو - Taha Okla - 02-08-22

وعليكم السلام ورحمة الله وبركاته

لما تريد تحدد (يعني تحدد لون فوق الخلية) بتختار (Selected)..
ولما تريد تضع التشيك (إشارة الصح) أو الغائها بتختار (Value) ..

يعني الكود الصحيح : 
كود :
DGVSupOper(13, DGVSupOper.CurrentRow.Index).Value = True


RE: checkbox في داتاكرد فيو - mohamedassim - 02-08-22

(02-08-22, 09:18 PM)Taha Okla كتب : وعليكم السلام ورحمة الله وبركاته

لما تريد تحدد (يعني تحدد لون فوق الخلية) بتختار (Selected)..
ولما تريد تضع التشيك (إشارة الصح) أو الغائها بتختار (Value) ..

يعني الكود الصحيح : 
كود :
DGVSupOper(13, DGVSupOper.CurrentRow.Index).Value = True


اخ Taha Okla  استخدمت الكود لكن نفس الشي يدخل جميع السجلات المعروضة في الداتاكردفيو ... وليس فقط السجلات التي تم تحديد الجيكبوكس لها بقمة True

RE: checkbox في داتاكرد فيو - سعود - 03-08-22

PHP كود :
For i As Integer = 0 To dgv.Rows.Count - IIf(dgv.AllowUserToAddRows, 2, 1)
            Dim row As DataGridViewRow = dgv.Rows(i)
            Dim ch As Boolean = CBool(row.Cells(2).Value)
            If ch = True Then
             'هنا تكتب اوامر الحفظ
            End If
Next 
خذ من الكود الفكرة وعدل ما يلزم.

RE: checkbox في داتاكرد فيو - Taha Okla - 03-08-22

لو بالامكان ارفاق هذا المشروع للتصحيح عليه (وتحديد مكان المشكلة بأي فورم وأي أمر فيه)،
أو عمل مشروع صغير فيه هذه المشلكة وكل الاكواد فيه جاهزة للتخزين وقم بارفاقه هنا  (وليس مشروع فارغ للعمل عليه من الصفر)..

RE: checkbox في داتاكرد فيو - mohamedassim - 03-08-22

اشكرك اخي ..جزاك الله خيرا
عملت الشرط بالطريقة الاتية واشتغلت

For i As Integer = 0 To DGVSupOper.Rows.Count - 1
            Dim c As Boolean
            c = DGVSupOper.Rows(i).Cells(13).Value
            If c = True Then