تقييم الموضوع :
  • 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 إذا كان هناك بعض الأوامر في الإجراء
بالتوفيق إن شاء الله تعالى

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف اربط تكست بوكس مع تكست بوكس اخر داخل تقرير report viewer 78hus78ali 1 25 منذ 11 ساعة مضت
آخر رد: زيد زينوبي
  [VB.NET] اريد كود للكشف عن تغير عنوان الشبكة e-coder 0 18 23-09-17, 03:21 AM
آخر رد: e-coder
  [سؤال] كيفية نسخ النصوص من داخل ليست بوكس تنمية المعرفة 7 136 12-09-17, 11:15 PM
آخر رد: تنمية المعرفة
  اريد كود لتحقق ان كان الفورم مفتوح ام لا The Light Fire 2 87 11-09-17, 06:57 PM
آخر رد: The Light Fire
  [كود] استفسار داخل اليست بوكس عبدالرحمن المكاوي 3 87 11-09-17, 05:29 PM
آخر رد: سعود الشامان
  مساعدة في كود البحث أبووسم 9 235 08-09-17, 09:44 PM
آخر رد: أبووسم
Lightbulb [مثال] تحويل التاريخ الميلادي الى هجري داخل الداتا جريد من قاعدة بيانات اكسس محمود بكرى 20 489 30-08-17, 02:37 PM
آخر رد: محمود بكرى
  كود لتشغيل اى برنامج داخل نموذج VB.Net konter 3 130 28-08-17, 11:54 AM
آخر رد: konter
  اريد طريقة دمج صورة مع صورة وحفظها كصورة واحدة soper 1 84 27-08-17, 12:01 PM
آخر رد: khodor1985
  [سؤال] اريد طريقة لمنع تكرار عناصر listbox riad21 3 324 26-08-17, 03:55 PM
آخر رد: حسن ايت حدو

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


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