+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : سؤال في قاعدة if (/showthread.php?tid=38483)
سؤال في قاعدة if - جيولوجي مبتدئ - 22-05-21
السلام عليكم ورحمة الله وبركاته
أخواني حصل لي شي غريب سؤال بسيط لكن لاأعرف الاجابه عليه
أريد أن أعمل select للصفوف الموجودة في datagridview2 بشرط أنها تحتوي في الخلية 8 على كلمة "غائب" وفي الخلية رقم 9 على كلمة "لايوجد"
يمعني الشرط مكون من جزئين و لكن تفشل هذه العملية
الغريب عندما أضع شرط واحد فقط ( أي شرط منهما ) ينجح بدون الكود أي مشاكل ويظلل الصفوف لكن اذا استخدمتهما سوياً يحصل الفشل
وهذا الكود المستخدم
Try
Dim i5 As Integer
For i5 = 0 To DataGridView2.Rows.Count - 1
If DataGridView2.Rows(i5).Cells(8).Value.ToString <> "غائب" And DataGridView2.Rows(i5).Cells(9).Value.ToString <> "لايوجد" Then
DataGridView2.Rows(i5).Selected = True
End If
Next
Catch ex As Exception
End Try
دمتم بود
RE: سؤال في قاعدة if - 2021 - 22-05-21
Try
Dim i5 As Integer
For i5 = 0 To DataGridView2.Rows.Count - 1
If DataGridView2.Rows(i5).Cells(8).Value.ToString = "غائب" And DataGridView2.Rows(i5).Cells(9).Value.ToString = "لايوجد" Then
DataGridView2.Rows(i5).Selected = True
End If
Next
Catch ex As Exception
End Try
"بشرط أنها تحتوي"
يعني = وليست <>
RE: سؤال في قاعدة if - جيولوجي مبتدئ - 22-05-21
السلام عليكم ورحمة اللخ وبركاته
أشكرك أخي على ردك
الحمد لله تم حل المشكلة حيث عملت Rebuild وعمل الكود 100 / 100
ولكن أخي كيف أستطيع حذف هذه الصفوف بعد أن عملت لها عملية Select حيث أريد أن أحذف هذه الصفوف دفعة واحدة من Datagridview2 فقط وليس من قاعدة البيانات
لك جزيل الشكر
دمتم بود
RE: سؤال في قاعدة if - 2021 - 22-05-21
For Each row As DataGridViewRow In DataGridView2.SelectedRows
DataGridView2.Remove(row)
Next
RE: سؤال في قاعدة if - جيولوجي مبتدئ - 23-05-21
ألف ألف شكر لك أستاذي الغالي ..... حفظك الله وبارك لك في رزقك
مع جزيل الشكر
دمت بود