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

لم ينجح معي هذا الكود

ناتج البحث مثلا
2005
OR 2006
المصفوفة
PHP كود :
Dim stringArray As String() = {"2005" _
"2006""2008""2009""2010""2011"}
        
Dim H As String Label4.Text
               Dim stringToCheck 
As String H
                
For Each x As String In stringArray
            
If x.Equals(stringToCheckThen
                Label20
.Text "MODEL " "  " x
            
Else
                Exit 
Sub

            End 
If
        
Next 
الرد
تم الشكر بواسطة:
#2
اخي العزيز انا جربت الكود والكود شغال ما فيه أي مشكلة

ما الخطأ الذي يظهر لك؟
الرد
تم الشكر بواسطة:
#3
السلام عليكم و رحمة الله و بركاته
أعتقد أن الأمر Exit Sub ليس في المكان المناسب

كود :
Dim stringArray As String() = {"2005" , "2006", "2008", "2009", "2010", "2011"}
        Dim H As String = Label4.Text
               Dim stringToCheck As String = H
                For Each x As String In stringArray
If x.Equals(stringToCheck) Then
                Label20.Text = "MODEL " & "  " & x
                         Exit Sub
            End If
        Next

كما يمكنك استبدال exit Sub بــ exit For إذا كان هناك بعض الأوامر في الإجراء
بالتوفيق إن شاء الله تعالى

السلام عليكم و رحمة الله و بركاته
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اريد بعض الاكواد البسيطه جدااااااا فيجوال بيسك 2010 kamel sobhy 6 3,191 08-07-19, 11:49 PM
آخر رد: ghani2003
  [VB.NET] كيف ممكن اضيف اكثر من مكتبه داخل ريسوريس e-coder 0 59 07-07-19, 07:59 PM
آخر رد: e-coder
  استفسار عن برمجة عدة ادوات داخل صندوق GroupBox1 سليم بلقاسم 5 170 07-07-19, 03:15 AM
آخر رد: سليم بلقاسم
  [سؤال] اخواني اريد عند الضغط علي الزر يظهر هذا ال نص داخل textbox1 XCoder 3 99 05-07-19, 09:26 PM
آخر رد: XCoder
Photo استفسار عن برمجة عدة ادوات داخل صندوق GroupBox1 سليم بلقاسم 1 82 05-07-19, 07:25 PM
آخر رد: elgokr
  اريد حفظ المشروع كتطبيق للموبايل او برنامج سهل لعمل تطبيق لموقعي ahmedhhh2 7 290 21-06-19, 07:00 PM
آخر رد: elgokr
  البحث بين تاريخين لاسم معين alshandodi 9 269 18-06-19, 12:06 PM
آخر رد: elgokr
  [سؤال] اريد كود يجل ال label متساوي البعد بين الأطراف مع ال label الأخر hichem1 3 424 11-06-19, 02:20 AM
آخر رد: سامي محمد
  Windows Phone app لا تظهر عندي اريد ارسال sms وجدت الدرس ومش عارف كيف ahmedhhh2 0 105 11-06-19, 12:18 AM
آخر رد: ahmedhhh2
  [ تمّ الحل ] : إختفاء الأدوات داخل الفورم عبد العزيز البسكري 7 255 10-06-19, 02:05 PM
آخر رد: sendbad100

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


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