تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سؤال في الداتا جريد فيو
#1
السلام عليكم
عندي داتا جريد فيو 
واريد وضع شرط انه اذا كانت الداتا جريد فيو تحتوي مثلا علي (أحمد و محمد ومصطفي) يظهر رساله (نعم)
واذا كانت تحتوي علي (محمود) يظهر رساله (لا).


الملفات المرفقة صورة/صور
   
الرد
تم الشكر بواسطة:
#2
كود :
Dim names As New List(Of String)
For Each r As DataGridViewRow In Me.DataGridView1.Rows
   If r.Cells(1).Value <> "" Then
       names.Add(r.Cells(1).Value)
   End If
Next
كود :
If names.Contains("أحمد") Or names.Contains("محمد") Or names.Contains("مصطفي") Then
   MsgBox("نعم")
End If
كود :
If names.Contains("محمود") Then
   MsgBox("لا")
End If
الرد
تم الشكر بواسطة: elgokr , عبد العزيز البسكري
#3
(01-11-18, 08:22 PM)rmnr كتب :
كود :
Dim names As New List(Of String)
For Each r As DataGridViewRow In Me.DataGridView1.Rows
   If r.Cells(1).Value <> "" Then
       names.Add(r.Cells(1).Value)
   End If
Next
كود :
If names.Contains("أحمد") Or names.Contains("محمد") Or names.Contains("مصطفي") Then
   MsgBox("نعم")
End If
كود :
If names.Contains("محمود") Then
   MsgBox("لا")
End If

بارك الله فيك أخي [b]rmnr[/b]  
جزاك الله خير الجزاء علي اهتمامك .
استخدمت الكود والمشكله اتحلت بفضل الله ثم مساعدتك.
الرد
تم الشكر بواسطة: elgokr , elgokr
#4
حتى تعم الفائدة يمكن استخدام الطريقة بهذا الشكل
كود :
       Dim lisName As String() = New String() {"أحمد", "محمد", "مصطفي"}
       For i As Integer = 0 To lisName.Count - 1
           For ii As Integer = 0 To DataGridView1.RowCount - 1
               If DataGridView1.Rows(ii).Cells(1).Value.Contains(lisName(i)) Then
                   MsgBox("Yes")
                   Exit For
               End If
           Next
       Next

كل المطلوب وضع الجمل او الكلمة المطلوب التحقق منها خلال هذا السطر
كود :
Dim lisName As String() = New String() {"أحمد", "محمد", "مصطفي"}

تحياتى للجميع
وتمنياتى لكم التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
#5
(02-11-18, 05:49 PM)elgokr كتب : حتى تعم الفائدة يمكن استخدام الطريقة بهذا الشكل
كود :
       Dim lisName As String() = New String() {"أحمد", "محمد", "مصطفي"}
       For i As Integer = 0 To lisName.Count - 1
           For ii As Integer = 0 To DataGridView1.RowCount - 1
               If DataGridView1.Rows(ii).Cells(1).Value.Contains(lisName(i)) Then
                   MsgBox("Yes")
                   Exit For
               End If
           Next
       Next

كل المطلوب وضع الجمل او الكلمة المطلوب التحقق منها خلال هذا السطر
كود :
Dim lisName As String() = New String() {"أحمد", "محمد", "مصطفي"}

تحياتى للجميع
وتمنياتى لكم التوفيق

بارك الله فيكم جميعا الكود اشتغل تمام الحمد لله
شكرا علي مجهودك اخي rmnr
واشكر الاخ الفاضل [b]elgokr شكرا جزيلا [/b]
الرد
تم الشكر بواسطة: elgokr , elgokr
#6
الشكر لله والحمد لله
والحمد لله على كل حال

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة في تصدير الداتا الى PDF alshandodi 2 48 أمس, 11:31 PM
آخر رد: alshandodi
  سؤال في الفورم الذي يظهر فيه التقرير Emam emam 2 48 17-02-19, 03:59 PM
آخر رد: Emam emam
  سؤال فى صفوف الداتا جريد فيو احمد خطاب 1 78 07-02-19, 03:51 AM
آخر رد: حريف برمجة
  [كود] سؤال لأهل الخبرة كيف يمكن استدعاء شااشة لبرنامج تم برمجتة بالجافا dametucorazon 1 89 06-02-19, 10:35 AM
آخر رد: dametucorazon
  سؤال حول امر الطباعة الفورية Osama Bayoumy 6 599 02-02-19, 01:08 PM
آخر رد: atef_020
  قسمة صف فى داتا جريد فيو nabil.1710 1 104 24-01-19, 03:31 AM
آخر رد: حريف برمجة
  سؤال BackgroundWorker new_programer 5 206 23-01-19, 06:50 PM
آخر رد: %Eman%
  تشغيل progress bar مع تحميل الداتا %Eman% 9 370 22-01-19, 03:22 PM
آخر رد: %Eman%
  سؤال بخصوص تشيك ليست بوكس نور الهدى الهدى 3 144 22-01-19, 07:51 AM
آخر رد: حريف برمجة
  شرط ديتا جريد فيو dasktop 1 83 20-01-19, 01:00 PM
آخر رد: sendbad100

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم