[منه]

السلام عليكم ورحمه الله وبركاته
ممكن كود تحقق إذا كانت الخليه المحدده أو اي حبه تحتها إذا كانت true or false
انا جربت اكواد كتير ومنها الكود ده 
 If datagridviw1.currentrow.calls.value=true  then


  بس بيطلع ايرور

[L35]

(01-09-20, 09:08 PM)منه كتب : السلام عليكم ورحمه الله وبركاته
ممكن كود تحقق إذا كانت الخليه المحدده أو اي حبه تحتها إذا كانت true or false
انا جربت اكواد كتير ومنها الكود ده 
 If datagridviw1.currentrow.calls.value=true  then


  بس بيطلع ايرور

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

لابد من تحديد العمود، فهذا الكود غير منطقي،
ويجب نسخ الكود من المشروع كما هو ووضعه في السؤال دون تعديل
أيضا وضع تفاصيل الايرور مع صورة له

بالنسبة ل DataGridView
تحديد العمود يكون في داحل أقواس Cells مثلا العمود الثالث:
(Cells(2

للحصول على المساعدة بشكل سريع
لابد من وضع تفاصيل المشكلة مع صور للأخطاء مع نسخ الكود كما هو دون تعديل ودون كتابته يدويا في موضوع المنتدى

حظا موفقا

[منه]

اولا شكرا لحضرتك على تفهم الموضوع
ثانياً انا فعلا كاتب الاكواد كما تفضلت وشرحتها لكن هنا في المنتدي هناك عائق في مشكله الكتابه باللغه الانجليزيه انا بعاني من مشكله اني عايزه كود تحقق إذا كانت الخليه المحدده ده مثلا true or false هو مفيش مشكله هجائيه يتم التعليق عليها من البرنامج لكن عندما اشغل البرنامج عنا يحدث المشكله

---

ده صوره الايرور ال بيطلع ولو ممكن تعملي علي الكود أو تكتبلي كود تاني يكون افضل

---

ده صوره الايرور ال بيطلع ولو ممكن تعملي علي الكود أو تكتبلي كود تاني يكون افضل

[L35]

الخاصية displayMember هي من نوع String فإذا استخدم معها Count فإنها ستعيد عدد أحرف قيمتها

يبدو أن المشروع يستخدام أدوات خاصة،
وذلك من ملاحظتي للإسم ListBoxControl1،
لأن الأداة المعروفة اسمها عادة هو ListBox1


بالنسبة للكود يمكن نسخه من الفيجوال مباشرة
عن طريق تحديده ثم عمل نسخ بالضغط على Ctrl+C
ثم في الرد يتم عمل لصق بالضغط على Ctrl+V
فلا داعي للكتابة التي قد تتسبب في عدم فهم المشكلة


بالنسبة للخطأ الأخير فهذا هو التعديل

PHP كود :

If DataGridView1.CurrentRow IsNot Nothing Then

    Dim c3 = DataGridView1.CurrentRow.Cells(3).Value

    If (c3 IsNot Nothing) Then

        If (Not IsDBNull(c3)) Then

            If c3 = True Then
                MsgBox(c3)
            End If

        End If

    End If

End If 


واخيرا لو يتم وضع المشروع يكون أفضل للمعاينة ومعرفة المشكلة وثم تصحيحها

[Anas Mahmoud]

المشكلة ليست في الكود المشكلة في فهم المطلوب عمله اولا قبل البحث على كود لانجاز المهمة ، تجريب الاكواد ليس خيارا ابدا عند تطوير برنامج نظيف وعملي ، يجب فهم كل حرف قبل كتابته ، اي سطر كود غير مفهوم بشكل كامل هو عبارة عن قنبلة موقوتة في الكود 

مثلا الخاصية CurrentRow تمثل الصف الحالي ، وكلمة الحالي تعني اخر صف تم الضغط عليه وفقط ، صف وحيد فقط

من فهمك لذلك نجد ان هذه الخاصية غير مناسبة للمطلوب في البرنامج

الخاصية المناسبة هي Rows والتي تمثل الاعمدة كلها ، نقوم باللف عليها ب For Each ونحدد شرط ان تكود الخلية الثالثة من الصف بقيمة True واذا تحقق نقوم باضافة قيمة الخلية الاولى الى نص الاستعلام :

كود :

       Dim Selects As String

       For Each R As DataGridViewRow In DataGridView1.Rows 'نلف على عناصر الجريد فيو كلها

           Dim CheckRow As DataGridViewCheckBoxCell = R.Cells(2) 'خليه الصح وخطأ

           If CheckRow.Value Then 'اذاكانت الخلية صح

               Dim TblCoulmnName As String = R.Cells(0).Value 'العنصر من العمود

               If String.IsNullOrWhiteSpace(Selects) Then
                   Selects = TblCoulmnName  'اول عمود
               Else
                   Selects &= "," & TblCoulmnName 'اضف العمود
               End If

           End If



       Next