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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استخراج مجلد وملفات من داخل قرص ابو روضة 8 79 26-05-18, 07:36 PM
آخر رد: ابو روضة
  كود البحث في حقول عدة جداول aftfm 3 42 24-05-18, 10:15 PM
آخر رد: elgokr
  اريد كود اظهار اسم المستخدم الخاص بالجميل Mina Botros 0 24 24-05-18, 01:58 PM
آخر رد: Mina Botros
  [سؤال] اريد كيفية الضغط علي انواع الاصناف تظهر الاصناف علي شكل بوتن wweecw 3 78 19-05-18, 07:56 PM
آخر رد: wweecw
  السلام عليكم اريد كود لما نتجاوز عدد محاولات 3 مرات في كلمة السر يطلعلي مسج تنبيه nosa 6 161 17-05-18, 05:30 AM
آخر رد: منصور أحمد حكمي
  اريد كود لسكون المنظومة بعد 5 دقائق من عدم استعمالها mawadaalmogrbi 1 55 17-05-18, 03:59 AM
آخر رد: elgokr
  [VB.NET] اريد درس لطباعة الـ DatagridView في الـ vb.net Obada.x3 3 1,258 13-05-18, 12:00 AM
آخر رد: elgokr
  السلام عليكم اريد كود تغير اسم المستخدم وكلمة المرور القديمة nosa 3 102 10-05-18, 11:21 AM
آخر رد: alaa.altunsi
  [نقاش] مشكلة في تحديد البحث سمير الجبالي 6 160 06-05-18, 02:36 AM
آخر رد: عبدالله الدوسري
  [كود] اريد كود إرسال البيانات من الفيجوال بيسك إلىPDF issamsaidd 4 117 03-05-18, 04:27 PM
آخر رد: عبدالله الدوسري

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


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